RosettaCodeData/Task/Exceptions/Pop11/exceptions-2.pop11
2023-07-01 13:44:08 -04:00

10 lines
190 B
Text

define main();
vars cargo;
define catcher();
;;; print exception data
cargo =>
enddefine;
catch(throw_exception, catcher, [my_exception ?cargo]);
enddefine;
main();