![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to extend.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to extend.fs CVS log | Up to [gforth] / gforth |
| version 1.41, 2000/08/17 12:46:57 | version 1.42, 2000/09/09 20:32:58 |
|---|---|
| Line 146 decimal | Line 146 decimal |
| >in @ | >in @ |
| loadfile @ | loadfile @ |
| if | if |
| loadfile @ file-position throw #TIB @ 1+ 0 d- \ !! bug for CRLF and EOF | loadfile @ file-position throw #fill-bytes @ 0 d- \ !! bug for CRLF and EOF |
| else | else |
| blk @ | blk @ |
| linestart @ | linestart @ |