![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to exceptions.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth|
Return to exceptions.fs CVS log | Up to [gforth] / gforth |
| version 1.7, 2000/05/04 07:45:26 | version 1.8, 2000/05/14 20:23:05 |
|---|---|
| Line 60 Defer store-backtrace | Line 60 Defer store-backtrace |
| rdrop \ recovery address | rdrop \ recovery address |
| >r ; | >r ; |
| : recover ( compilation orig -- ; run-time -- ) \ gforth | : recover ( compilation orig1 -- orig2 ; run-time -- ) \ gforth |
| \ !! check using a special tag | \ !! check using a special tag |
| POSTPONE (recover) | POSTPONE (recover) |
| POSTPONE else ; immediate compile-only | POSTPONE else ; immediate compile-only |