Re: float problem

[tmoran@acm.org]

> ... but I was using Pascal (and a bit Delphi)
> before, where there is no rounding in procedure "write".
  So it must print n decimal digits to correctly represent 1/2**n,
e.g. a 4 byte IEEE float must print 23 digits.
> BTW: is it possible to disable the rounding in "put"? Maybe with some
> global boolean variable or someting (maybe a pragma).
  Look at the "Aft" parameter in Float_IO.Put You can specify how many
digits you want printed to the right (or left) of the decimal point.  You
didn't say, so the compiler used Default_Aft.  Your post showed 5 digits
to the right, so Default_Aft must be 5, so Float'digits is 6 in your
compiler.  Thus all your calculations, and printing, were done to 6 digit
accuracy.  If you want something different from the defaults you will have
to say so in your program.  Defaults are a convencience, but they can also
be a trap for the unwary.