File psl-1983/3-1/tests/mini-error-handlers.red from the latest check-in


% MINI-ERROR-HANDLERS.RED - Error Handler stubs
on syslisp;

syslsp procedure FatalError s;
 <<ErrorHeader(); Prin2 " FATAL "; ErrorTrailer s>>;

syslsp procedure StdError m;
  Error m;

off syslisp;

end;


REDUCE Historical
REDUCE Sourceforge Project | Historical SVN Repository | GitHub Mirror | SourceHut Mirror | NotABug Mirror | Chisel Mirror | Chisel RSS ]