--- gforth/except.fs 2006/10/11 19:18:51 1.12 +++ gforth/except.fs 2006/10/13 17:36:07 1.13 @@ -77,7 +77,12 @@ Defer store-backtrace \ !! explain handler on-stack structure Variable first-throw -: nothrow ( -- ) first-throw on ; +: nothrow ( -- ) \ gforth + \G Use this (or the standard sequence @code{['] false catch drop}) + \G after a @code{catch} or @code{endtry} that does not rethrow; + \G this ensures that the next @code{throw} will record a + \G backtrace. + first-throw on ; : (try) ( ahandler -- ) first-throw on