Re: IEEE float I/O in DEC Ada

["GitaSrinivasan" <gitasri@swva.net>]

It is not clear whether you are talking about a VAX or an Alpha AXP
platform.

OpenVMS on AXP contains routines to perform such conversions -- I would look
for :

HELP RTL_Routines LIB$

In addition, if memory serves me correctly System.t_float is a valid data
type -- so simply declaring a variable of that type and assigning your
"float" variable should do the trick :

       declare
              myfloat : float ;
              ieee_float : system.t_float ;
       begin
             ieee_float := system.t_float( myfloat ) ;
       end ;

 I would look ada ada$predefined:system_.adc
On VAX systems, we had to develop a routine to perform these conversions. I
am not sure if the recent Open VMS releases on VAX'en would have these
routines are not.


Gautier wrote in message <374EB9A9.F226AEE7@Maths.UniNe.CH>...
>Hi all.
>
>Since DEC Ada wants either
>
>  pragma float_representation(vax_float);
>
>or
>
>  pragma float_representation(ieee_float);
>
>for a whole "project" and a part of mine requires
>the VAX representation, so I must use it.
>
>_But_ I wish to save results in IEEE format -
>I can live with text format but the IEEE is
>a bit more compact...
>
>DEC Ada doesn't seem to have special types or
>conversions functions for both floats sorts.
>
>Anyway, are there conversion routines available ?
>
>NB: the version is :
> "DEC Ada V3.2-8 with the Professional Development Option"
>
>TIA
>
>--
>Gautier
>
>--------
>http://members.xoom.com/gdemont/