File psl-1983/tests/mini-error-errorset.red artifact a48d27fb23 part of check-in 4f9bfc4337
% MINI-ERROR-ERRORSET on syslisp; syslsp procedure ErrorHeader; Prin2String "*** ERROR *** "; syslsp procedure Error s; <<ErrorHeader(); ErrorTrailer s>>; syslsp procedure ErrorTrailer s; <<Prin2T s; Quit;>>; off syslisp; End;