Return to characters_and_numbers.ads CVS log

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

Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Numbers/characters_and_numbers.ads, Revision 1.1

1.1     ! maekawa     1: with text_io;                            use text_io;
        !             2:
        !             3: package Characters_and_Numbers is
        !             4:
        !             5: -- DESCRIPTION :
        !             6: --   This package offers some utilities for the input/output routines
        !             7: --   of arbitrary precision numbers.
        !             8:
        !             9:   function Convert ( c : character ) return natural;
        !            10:
        !            11:   -- DESCRIPTION :
        !            12:   --   Returns 10 if the character does not represent a number
        !            13:   --   between 0 and 9, otherwise returns the corresponding number.
        !            14:
        !            15:   function Convert ( s : String ) return natural;
        !            16:
        !            17:   -- DESCRIPTION :
        !            18:   --   Converts the string into a number, the string is supposed to
        !            19:   --   contain a number in decimal format.
        !            20:
        !            21:   function Convert_Decimal ( n : natural ) return character;
        !            22:
        !            23:   -- DESCRIPTION :
        !            24:   --   Returns the character representation of the number n in [0,9].
        !            25:
        !            26:   function Convert_Hexadecimal ( c : character ) return natural;
        !            27:
        !            28:   -- DESCRIPTION :
        !            29:   --   Returns the numerical representation of the character,
        !            30:   --   if it is a hexadecimal symbol, otherwise 16 is returned.
        !            31:
        !            32:   function Convert_Hexadecimal ( n : natural ) return character;
        !            33:
        !            34:   -- DESCRIPTION :
        !            35:   --   Returns the character representation of the number n in [0,15].
        !            36:
        !            37:   function Convert ( n : natural ) return String;
        !            38:
        !            39:   -- DESCRIPTION :
        !            40:   --   Returns the representation of the natural number as a string
        !            41:   --   of characters.
        !            42:
        !            43:   procedure Skip_Spaces ( file : in file_type; c : in out character );
        !            44:
        !            45:   -- DESCRIPTION :
        !            46:   --   Scans the file for the first character that is not a space.
        !            47:   --   That character is returned as the parameter c on return.
        !            48:
        !            49:   procedure Skip_Underscores ( file : in file_type; c : in out character );
        !            50:
        !            51:   -- DESCRIPTION :
        !            52:   --   Scans the file for the first character that is not an underscore.
        !            53:   --   That character is returned as the parameter c on return.
        !            54:
        !            55: end Characters_and_Numbers;