Return to extend.fs CVS log | Up to [gforth] / gforth |
version 1.42, 2000/09/09 20:32:58 | version 1.43, 2000/09/10 19:50:33 |
---|---|
Line 146 decimal | Line 146 decimal |
>in @ | >in @ |
loadfile @ | loadfile @ |
if | if |
loadfile @ file-position throw #fill-bytes @ 0 d- \ !! bug for CRLF and EOF | loadfile @ file-position throw |
[IFDEF] #fill-bytes #fill-bytes @ [ELSE] #tib @ 1+ [THEN] 0 d- | |
else | else |
blk @ | blk @ |
linestart @ | linestart @ |