From bb80ba1f9c02be0f99690ca392644ae4404aecc7 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Mon, 3 Jul 2017 19:09:38 +1000 Subject: String output of Time/Durations now neater --- src/simple_time.ads | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src/simple_time.ads') diff --git a/src/simple_time.ads b/src/simple_time.ads index 1a0b61b..64af076 100644 --- a/src/simple_time.ads +++ b/src/simple_time.ads @@ -12,7 +12,10 @@ package Simple_Time is function Now return Time renames Ada.Calendar.Clock; - function To_String (Moment : in Time) return String; + function Image (Moment : in Time) return String; + + + function Image (Moment : in Duration) return String; function "-" (Left, Right : in Time) return Duration renames Ada.Calendar."-"; -- cgit