ftp.ee.pdx.edu/2014.02.ftp.ee.pdx.edu.tar/ftp.ee.pdx.edu/pub/users/Harry/compilers/p10/tst/read.pcat

Text File | 2006-02-17 | 179b | 11 lines

(* This files test IR generation for READ statements. *)
program is
  var i,j,k: integer := 0;
  var x,y,z: real := 0.0;

begin
  read (i);
  read (x);
  read (i,x,j,y,k,z);
end;