[categories] [index] [all (552)] [latest]

1. Custom error handler

   errordict /handleerror {
     (-- Error occured!n) print
     (Error    : ) print $error /errorname get ==
     (Command  : ) print $error /command get ==
     (Operands : ) print $error /ostack get ==
     (Dicts    : ) print $error /dstack get ==
     (Exec     : ) print $error /estack get ==    
     stop
   } put
   

   With this error:

   (asd) 2 div
   

   Will print:

   -- Error occured!
   Error    : /typecheck
   Command  : --div--
   Operands : [(asd) 2]
   Dicts    : [-dict- -dict- -dict-]
   Exec     : [--%interp_exit-- .runexec2 -file- -packedarray- null 2 --%stopped_push-- -file- {{/execute0 --cvx-- 1 --.quit--} --if--} {$error /newerror --get-- --and-- {/handleerror --.systemvar-- --exec-- --flush-- true} {false} --ifelse--} false 1 --%stopped_push-- 1990 1 3 --%oparray_pop-- 1989 1 3 --%oparray_pop-- 1977 1 3 --%oparray_pop-- 1833 1 3 --%oparray_pop-- null --%errorexec_pop-- .ruGPL Ghostscript 9.56.1: Unrecoverable error, exit code 1
   nexec2 -file- -packedarray- null 2 --%stopped_push-- -file-]