File psl-1983/tests/mini-io-errors.red from the latest check-in


% MINI-IO-ERRORS.RED

Procedure IoError M;
 <<terpri();
   ErrorHeader();
   Prin2t M;
   RDS 0;
   WRS 1;
   NIL>>;

End;


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