This package contains the routines for Ada.Text_IO.Float_IO that are shared among separate instantiations of this package. The routines in this package are identical semantically to those in Float_IO itself, except that generic parameter Num has been replaced by Long_Long_Float, and the default parameters have been removed because they are supplied explicitly by the calls from within the generic template. This package is also used by Ada.Text_IO.Fixed_IO, and Ada.Text_IO.Decimal_IO.

package Ada.Text_IO.Float_Aux is

procedure Load_Real
  (File : in File_Type;
   Buf  : out String;
   Ptr  : in out Natural);

procedure Get
  (File  : in File_Type;
   Item  : out Long_Long_Float;
   Width : in Field);

procedure Put
  (File : in File_Type;
   Item : in Long_Long_Float;
   Fore : in Field;
   Aft  : in Field;
   Exp  : in Field);

procedure Gets
  (From : in String;
   Item : out Long_Long_Float;
   Last : out Positive);

procedure Puts
  (To   : out String;
   Item : in Long_Long_Float;
   Aft  : in Field;
   Exp  : in Field);

end Ada.Text_IO.Float_Aux;