From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,cf09cb55989cab65
X-Google-Attributes: gid103376,public
From: Pascal MALAISE <malaise@magic.fr>
Subject: Re: Data conversion
Date: 1998/10/31
Message-ID: <363B5ADC.8639CEB0@magic.fr>#1/1
X-Deja-AN: 407063369
Content-Transfer-Encoding: 7bit
References: <71fcr5$9to@sifon.cc.mcgill.ca>
X-Accept-Language: en
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: usenet@ulysse.magic.fr
X-Trace: ulysse.magic.fr 909859549 396 127.0.0.1 (31 Oct 1998 18:45:49 GMT)
Organization: Magic On Line
Mime-Version: 1.0
NNTP-Posting-Date: 31 Oct 1998 18:45:49 GMT
Newsgroups: comp.lang.ada
Date: 1998-10-31T18:45:49+00:00
List-Id: <comp.lang.ada>

Mat & Syl wrote:
> 
> I need a function to convert float to string and other one for string to
> float.
> 
>             Thanks
text_io (83) or Ada.Text_IO.Float_IO (95)

private generic
   type Num is digits <>;
package Ada.Text_IO.Float_IO is
...
   procedure Get
     (From : in String;
      Item : out Num;
      Last : out Positive);

   procedure Put
     (To   : out String;
      Item : in Num;
      Aft  : in Field := Default_Aft;
      Exp  : in Field := Default_Exp);
...

-- 
Pascal MALAISE
(priv) mailto:malaise@magic.fr
(prof) mailto:malaise@fr.airsysatm.thomson-csf.com