CVS difference for ais/ai-00427.txt

Differences between 1.4 and version 1.5
Log of other versions for file ais/ai-00427.txt

--- ais/ai-00427.txt	2005/05/06 00:32:18	1.4
+++ ais/ai-00427.txt	2005/06/16 23:47:46	1.5
@@ -1,4 +1,4 @@
-!standard 9.6.1(1)                                   05-05-05  AI95-00427/03
+!standard 9.6.1(1)                                   05-05-05  AI95-00427/04
 !class amendment 05-04-10
 !status Amendment 200Y 05-05-05
 !status ARG Approved 11-0-0  05-04-16
@@ -29,6 +29,8 @@
     and parameters Seconds and Sub_Second of Time_Of, Seconds_Of and Split
     are clarified.
 
+8   The second Time_Of in Calendar.Formatting should default Seconds to 0.0.
+
 !problem
 
 A number of improvements to the additional time facilities of AI-351 are
@@ -45,6 +47,10 @@
 There are no functions Year, Month and Day with a time zone parameter,
 this forces the use of Split.
 
+The second Time_Of does not default the Seconds parameter; yet this is
+the same as the Time_Of in Calendar (with time zones and leap seconds added),
+which does default the parameter.
+
 The AARM note regarding difference is peculiar.
 
 The facilities of these packages enable the decomposition of a Time "as
@@ -117,9 +123,17 @@
                      Sub_Second : out Second_Duration;
                      Time_Zone  : in Time_Zones.Time_Offset := 0);
 
-Replace 9.6.1(33/2-34/2) by
+Replace 9.6.1(32/2-34/2) by
 
 
+    function Time_Of (Year       : Year_Number;
+                      Month      : Month_Number;
+                      Day        : Day_Number;
+                      Seconds    : Day_Duration := 0.0;
+                      Leap_Second: Boolean := False;
+                      Time_Zone  : Time_Zones.Time_Offset := 0)
+                              return Time;
+
     procedure Split (Date       : in Time;
                      Year       : out Year_Number;
                      Month      : out Month_Number;
@@ -225,14 +239,22 @@
     If Time_Of is called with a Sub_Second value of 1.0, the value
     returned is equal to the value of Time_Of for the next second with
     a Sub_Second value of 0.0.
-
-Add at the end of 9.6.1 (70/2)
 
-    If Time_Of is called with a Seconds value of 86_400.0, the value
-    returned is equal to the value of Time_Of for the next day with
-    a Seconds value of 0.0.
+Replace 9.6.1(69/2-74/4) by:
 
-Replace 9.6.1(71/2-74/4) by:
+function Time_Of (Year       : Year_Number;
+                  Month      : Month_Number;
+                  Day        : Day_Number;
+                  Seconds    : Day_Duration := 0.0;
+                  Leap_Second: Boolean := False;
+                  Time_Zone  : Time_Zones.Time_Offset := 0)
+                          return Time;
+
+    Returns a Time built from the date and time values, relative to the
+    specified time zone offset. Time_Error is raised if Leap_Second is True,
+    and Seconds is not appropriate for a Leap_Second. If Time_Of is called with
+    a Seconds value of 86_400.0, the value returned is equal to the value of
+    Time_Of for the next day with a Seconds value of 0.0.
 
 procedure Split (Date       : in Time;
                  Year       : out Year_Number;
@@ -245,10 +267,6 @@
                  Leap_Second: out Boolean;
                  Time_Zone  : in Time_Zones.Time_Offset := 0);
 
-
-
-
-
    Split Date into its constituent parts (Year, Month, Day, Hour, Minute,
    Second, Sub_Second), relative to the specified time zone offset. Leap_Second
    is True if Date identifies a leap second. The value returned through the
@@ -362,7 +380,7 @@
 
 @dinsc
 
-This dummy content to force a conflict; the real changes are in the conflict
+This is dummy content to force a conflict; the real changes are in the conflict
 text.
 
 !ACATS test

Questions? Ask the ACAA Technical Agent