![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to other.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / test|
Return to other.fs CVS log | Up to [gforth] / gforth / test |
| version 1.15, 2000/04/27 08:51:33 | version 1.16, 2000/09/23 12:27:46 |
|---|---|
| Line 167 abort 0 [if] | Line 167 abort 0 [if] |
| [then] | [then] |
| ( 0 ) throw | ( 0 ) throw |
| \ the same test with CRLF newlines | |
| test-restore-input[ abort \ these aborts are skipped | |
| abort 0 [if] | |
| s" oops" 2drop ]test-restore-input abort | |
| [then] | |
| ( 0 ) throw | |
| \ comments across several lines | \ comments across several lines |
| ( fjklfjlas;d | ( fjklfjlas;d |