File psl-1983/3-1/tests/20/main0.red artifact 75a4e052d7 part of check-in 255e9d69e6
% Simple 1 file test % This is program MAIN1.RED On SYSLISP; IN "XXX-HEADER.RED"$ Procedure FirstCall; <<Init(); PutC Char A; PutC Char B; Terpri(); PutInt 1; Terpri(); PutInt 2; Terpri(); Putint Timc(); Terpri(); Putint Timc(); Terpri(); Quit;>>; procedure terpri(); PutC Char EOL; end;