File psl-1983/tests/mini-error-errorset.red artifact a48d27fb23 part of check-in 72f75b2f9c
% 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;