/jonesforth/test_exception.f.out
<< BackTEST4+0 TEST3+8 CATCH+28 CATCH ( ) TEST2+8 TEST+0
TEST4+0 TEST3+20 CATCH+28 CATCH ( ) TEST2+8 TEST+0
TEST3 threw exception 26
TEST4+0 TEST3+8 TEST2+68 TEST+0
TEST4+0 TEST3+20 TEST2+68 TEST+0
UNCAUGHT THROW 26