Return to standard_integer_numbers_io.ads CVS log

Up to [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Numbers

Initial revision

with text_io;                            use text_io;

package Standard_Integer_Numbers_io is

-- DESCRIPTION :
--   Definitions of the input/output routines for standard integers.

  procedure get ( file : in file_type; i : in out integer );

  -- DESCRIPTION :
  --   Reads an integer number from file.

  procedure put ( file : in file_type; i : in integer );

  -- DESCRIPTION :
  --   Writes an integer number on file, with no spaces in front.

  procedure put ( file : in file_type; i : in integer; dp : in natural );

  -- DESCRIPTION :
  --   Writes the number on file, using at least dp decimal places.
  --   If the number needs less space in its display,
  --   then blanks are added in front of the number.

end Standard_Integer_Numbers_io;