Re: Trivial question: how to avoid confusing sec, min, hour and day in a program?

["J-P. Rosen" <rosen@adalog.fr>]

Le 24/10/2021 à 08:52, reinert a écrit :
> Ada seems to guarantee that Duration covers 24 hours (?). What you do when you need to represent for example 5 years?
Ada /guarantees/ at least 24 hours, since subtype Day_Duration 
corresponds to one day.

In practice, Duration is much bigger. There is no requirement for it, 
since it obviously depends on the implementation. With Gnat, the 
following program:

with Text_Io; use Text_Io;
procedure Test_Duration is
    package Duration_Io is new Fixed_Io (Duration);
    use Duration_Io;
begin
    null;
    Put ("duration'last:"); Put (Duration'Last); New_Line;
    Put ("days:") ;  Put (Duration'Last / 86400); New_Line;
    Put ("years:") ;  Put (Duration'Last / 86400 / 365.25); New_Line;
end;

gives:
duration'last: 9223372036.854775807
days:     106751.991167300
years:        292.271023045

-- 
J-P. Rosen
Adalog
2 rue du Docteur Lombard, 92441 Issy-les-Moulineaux CEDEX
Tel: +33 1 45 29 21 52
https://www.adalog.fr