SuperHack/SuperHack CD.bin/CODING/MISC/ADA_TUT3.ZIP/ADD.ADA

Text File | 1994-08-22 | 158 b | 8 lines

with Text_IO; use Text_IO;
procedure Add is
   package My_Int_IO is new Integer_IO(Integer); use My_Int_IO;
begin
   Put(2 + 2);
   New_Line;
end Add;