Ada.Text_IO.Fixed_IO - strange prefix in output

#1 08-19-2008, 11:03 AM

Consider:

with Ada.Text_IO;
with Ada.Calendar;

procedure A is

package Duration_IO is new
Ada.Text_IO.Fixed_IO (Ada.Calendar.Day_Duration);

D : Ada.Calendar.Day_Duration := 0.0;

begin
Duration_IO.Put (D);
end A;

The above program produces the following output:

N = 1
0.000000000

I use GNAT 3.4.6 (yes, that old). Was this a compiler/runtime bug?
The output from newer compiler contains only the number.

--
Maciej Sobczak * www.msobczak.com * www.inspirel.com

Database Access Library for Ada: www.inspirel.com/soci-ada

#2 08-20-2008, 07:48 AM

Maciej Sobczak <see.my.homepage@gmail.com> writes:

> Consider:
>
> with Ada.Text_IO;
> with Ada.Calendar;
>
> procedure A is
>
> package Duration_IO is new
> Ada.Text_IO.Fixed_IO (Ada.Calendar.Day_Duration);
>
> D : Ada.Calendar.Day_Duration := 0.0;
>
> begin
> Duration_IO.Put (D);
> end A;
>
> The above program produces the following output:
>
> N = 1
> 0.000000000
>
> I use GNAT 3.4.6 (yes, that old). Was this a compiler/runtime bug?

Yes, they delivered the runtime with "debug" pragmas enabled. You can
recompile the runtime.

--
-- Stephe

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode