home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 July / Chip_2000-07_cd.bin / servis / SPNT / sp6x86.exe / pscript.dll / 259 / 5 < prev    next >
Encoding:
Text File  |  1999-12-15  |  413 b   |  5 lines
  1. /nl{currentpoint exch pop 100 exch 10 sub moveto}def errordict begin
  2. /handleerror{showpage 100 720 moveto/Courier-Bold findfont 10 scalefont setfont
  3. (ERROR: )show errordict begin $error begin errorname =string cvs show nl(OFFENDING COMMAND: )show/command load =string cvs show nl nl(OPERAND STACK: )show $error/ostack known{ostack aload length{=string cvs nl show}repeat}if end
  4. end showpage stop}bind def end
  5.