Ada.Real_Time.Split(), Time Seconds_Count Time_Span. Seconds_Count - , , Time_Span - ( ) Time_Units . . D.8 (29).
Seconds_Count , Time_Span Duration To_Duration().
Note that you can invert the process and use Time_Of () to restore the time value.
source
share