about summary refs log tree commit diff stats
path: root/examples/exceptions.f
blob: 3e51316d5bccdcee99b4c6307c7cfc797932f4e4 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
/ Exceptions examples /

∇ SHOW .S CR CLEAR             / Print then clear stack /

1 2 ⊂ +                       / Just runs + / SHOW

1 2 ⊂ + 0 THROW  CATCH         / Runs +, no exception thrown  0 pushed to stack / SHOW

1 2 ⊂ + ABORT  CATCH           / Exception -1 thrown  Stack rewound, -1 pushed to stack / SHOW

1 2 ⊂ + ABORT                 / Uncaught exception /