RosettaCodeData/Task/Stack-traces/PL-I/stack-traces.pli

8 lines
334 B
Plaintext

/* The SNAP option in the ON statement is sufficient to obtain */
/* a traceback. The SYSTEM option specifies that standard */
/* system action is to occur, which resume execution after the */
/* SIGNAL statement. */
on condition(traceback) snap system;
...
signal condition(traceback);