--- gforth/kernel/files.fs	2000/09/09 20:32:58	1.11
+++ gforth/kernel/files.fs	2000/09/10 19:50:33	1.12
@@ -34,9 +34,6 @@
     THEN
     newline r> write-file ;
 
-: read-line ( c_addr u1 wfileid -- u2 flag wior )
-    (read-line) drop ;
-
 \ include-file                                         07apr93py
 
 : push-file  ( -- )  r>