![[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.43, 2000/09/10 19:50:33 |
|---|---|
| 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 |
| [IFDEF] #fill-bytes #fill-bytes @ [ELSE] #tib @ 1+ [THEN] 0 d- | |
| else | else |
| blk @ | blk @ |
| linestart @ | linestart @ |