home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Applications / GW AdaEd 1.4.2 / GWAdaDemos / GWU Demos / io_libs.ada < prev    next >
Encoding:
Text File  |  1993-10-09  |  346 b   |  14 lines  |  [TEXT/GADA]
  1. -- Precompiled instantiations of Integer_IO and
  2. -- Float_IO for the predefined Integer and Float types
  3.  
  4. WITH Text_IO;
  5. PACKAGE My_Int_IO IS
  6.   NEW Text_IO.Integer_IO (Num => Integer);
  7.  
  8. WITH Text_IO;
  9. PACKAGE My_Flt_IO IS
  10.   NEW Text_IO.Float_IO   (Num => Float);
  11.  
  12. WITH Text_IO;
  13. PACKAGE Boolean_IO IS 
  14.   NEW Text_IO.Enumeration_IO (Enum => Boolean);