Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Numbers/numbers_io.ads, Revision 1.1
1.1 ! maekawa 1: with Standard_Floating_Numbers; use Standard_Floating_Numbers;
! 2:
! 3: package Numbers_io is
! 4:
! 5: -- DESCRIPTION :
! 6: -- This package provides user friendly input routines.
! 7: -- The exception handlers allow repeated trials.
! 8:
! 9: procedure Read_Positive ( p : out positive );
! 10: procedure Read_Natural ( n : out natural );
! 11: procedure Read_Integer ( i : out integer );
! 12: procedure Read_Single_Float ( f : out single_float );
! 13: procedure Read_Double_Float ( f : out double_float );
! 14:
! 15: -- DESCRIPTION :
! 16: -- Reads a number from standard input.
! 17: -- As long as the value obtained is not of the right type,
! 18: -- the user will be asked to try again.
! 19:
! 20: end Numbers_io;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>