Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Numbers/multprec_integer_numbers_io.ads, Revision 1.1
1.1 ! maekawa 1: with text_io; use text_io;
! 2: with Multprec_Integer_Numbers; use Multprec_Integer_Numbers;
! 3:
! 4: package Multprec_Integer_Numbers_io is
! 5:
! 6: -- DESCRIPTION :
! 7: -- This package provides basic input/output routines for integer numbers
! 8: -- of arbitrary length.
! 9:
! 10: procedure get ( lc : in out character; i : in out Integer_Number );
! 11: procedure get ( file : in file_type;
! 12: lc : in out character; i : in out Integer_Number );
! 13: procedure get ( i : in out Integer_Number );
! 14: procedure get ( file : in file_type; i : in out Integer_Number );
! 15:
! 16: -- DESCRIPTION :
! 17: -- Reads a string of numbers and returns a natural number.
! 18: -- The parameter lc is the leading character on entry.
! 19: -- On return it is the last character read.
! 20:
! 21: procedure put ( i : in Integer_Number );
! 22: procedure put ( file : in file_type; i : in Integer_Number );
! 23:
! 24: -- DESCRIPTION :
! 25: -- Writes the number on Standard Output or on file.
! 26:
! 27: procedure put ( i : in Integer_Number; dp : in natural );
! 28: procedure put ( file : in file_type;
! 29: i : in Integer_Number; dp : in natural );
! 30:
! 31: -- DESCRIPTION :
! 32: -- Writes the number on Standard Output or on file, using at least
! 33: -- dp decimal places. If the number needs less space in its display,
! 34: -- then blanks are added in front of the number.
! 35:
! 36: end Multprec_Integer_Numbers_io;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>