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 |