subtype DOS_Time is Interfaces.Unsigned_32;
procedure Split
( | Date | : Time; |
Year | : out Year_Number; | |
Month | : out Month_Number; | |
Day | : out Day_Number; | |
Seconds | : out Day_Duration); |
function Time_Of
( | Year | : Year_Number; |
Month | : Month_Number; | |
Day | : Day_Number; | |
Seconds | : Day_Duration := 0.0) |