diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-09-12 13:11:54 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-09-12 13:11:54 +0000 |
commit | f4abddd09995c835be3b8259b774f58d8685c165 (patch) | |
tree | 507965b7d7ae43bbd6b2a04053989a365713205c /gcc/ada/a-calend.ads | |
parent | 51ec325087a0306184fad3c2abf7a375671d6e77 (diff) | |
download | ppe42-gcc-f4abddd09995c835be3b8259b774f58d8685c165.tar.gz ppe42-gcc-f4abddd09995c835be3b8259b774f58d8685c165.zip |
Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@128434 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-calend.ads')
-rw-r--r-- | gcc/ada/a-calend.ads | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/gcc/ada/a-calend.ads b/gcc/ada/a-calend.ads index 711cd22af7e..8c373fd2c93 100644 --- a/gcc/ada/a-calend.ads +++ b/gcc/ada/a-calend.ads @@ -53,7 +53,9 @@ package Ada.Calendar is function Clock return Time; -- The returned time value is the number of nanoseconds since the start - -- of Ada time (1901-01-01 00:00:00.0 UTC). + -- of Ada time (1901-01-01 00:00:00.0 UTC). If leap seconds are enabled, + -- the result will contain all elapsed leap seconds since the start of + -- Ada time until now. function Year (Date : Time) return Year_Number; function Month (Date : Time) return Month_Number; @@ -169,11 +171,16 @@ private -- 1972-06-30 23:59:59.0 -- 1972-07-01 00:00:00.0 - -- When a new leap second is added, the following steps must be carried - -- out: + -- When a new leap second is introduced, the following steps must be + -- carried out: - -- 1) Increment Leap_Seconds_Count by one - -- 2) Add an entry to the end of table Leap_Second_Dates + -- 1) Increment Leap_Seconds_Count in a-calend.adb by one + -- 2) Increment LS_Count in xleaps.adb by one + -- 3) Add the new date to the aggregate of array LS_Dates in + -- xleaps.adb + -- 4) Compile and execute xleaps + -- 5) Replace the values of Leap_Second_Times in a-calend.adb with the + -- aggregate generated by xleaps -- The algorithms that build the actual leap second values and discover -- how many leap seconds have occured between two dates do not need any |