Re: Read +Inf from file/string

[Stephen Leake <stephen.a.leake.1@gsfc.nasa.gov>]

"Atle R�stad" <aer@edh.ericsson.se> writes:

> Hi
> 
> I want to read floating-points from a file. Some of the numbers can be
> +Inifinite. Is there a way to read inifinite floating points with gnat
> 3.13p?

Is the file in binary or ASCII?

> There is no problem in writing (put) an infinite number this will
> produce "+Inf****************", but how can i read (get) it?

This implies you are talking about ASCII. Since that format is not
valid for Ada.Text_IO, you'll have to do something else.

I'd suggest reading each number as a string, delimited by whatever
your delimiters are. Then check for the special case of "+Inf*"; if
it's not that, call Ada.Text_IO.Get (String). If it is "+Inf*", return
the appropriate floating point value, via Unchecked_Conversion.

-- 
-- Stephe