Return to int.fs CVS log | Up to [gforth] / gforth / kernel |
version 1.34, 1999/05/18 15:13:50 | version 1.35, 1999/06/17 19:54:35 |
---|---|
Line 784 Variable init8 | Line 784 Variable init8 |
[ [THEN] ] | [ [THEN] ] |
['] cold catch DoError cr | ['] cold catch DoError cr |
[ has? os [IF] ] | [ has? os [IF] ] |
bye | 1 (bye) \ !! determin exit code from throw code? |
[ [THEN] ] | [ [THEN] ] |
; | ; |