summaryrefslogtreecommitdiff
path: root/gcc/ada/a-calend-vms.adb
diff options
context:
space:
mode:
authorrwild <rwild@138bc75d-0d04-0410-961f-82ee72b054a4>2008-03-24 17:48:07 +0000
committerrwild <rwild@138bc75d-0d04-0410-961f-82ee72b054a4>2008-03-24 17:48:07 +0000
commit36b938a343910149d31789c8939924f90daa69a6 (patch)
tree89b2171703528d83f5a20ddb5bbf2e0adb78a9ad /gcc/ada/a-calend-vms.adb
parentbe42496cde4eb1a974bd8f595417a03a8a171364 (diff)
downloadgcc-36b938a343910149d31789c8939924f90daa69a6.tar.gz
2008-03-24 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
* 9drpc.adb, a-caldel-vms.adb, a-caldel.adb, a-calend-vms.adb, a-calend.adb, a-calend.ads, a-calfor.adb, a-chahan.ads, a-chtgke.adb, a-cihama.ads, a-ciorse.adb, a-clrefi.ads, a-cohama.ads, a-comlin.ads, a-coorse.adb, a-crbtgk.adb, a-direct.adb, a-except-2005.adb, a-except-2005.ads, a-except.adb, a-except.ads, a-exexda.adb, a-exexpr-gcc.adb, a-exexpr.adb, a-exextr.adb, a-filico.ads, a-finali.ads, a-intnam-aix.ads, a-intnam-solaris.ads, a-ngcefu.adb, a-ngelfu.adb, a-numaux-darwin.adb, a-numeri.ads, a-sequio.ads, a-strbou.ads, a-strfix.adb, checks.adb, exp_ch3.adb, exp_ch4.adb, exp_ch4.ads, exp_ch5.adb, exp_ch6.adb, exp_ch6.ads, exp_ch7.adb, exp_ch7.ads, exp_ch9.adb, exp_ch9.ads, exp_dbug.adb, exp_dbug.ads, exp_disp.adb, exp_dist.adb, exp_dist.ads, exp_fixd.adb, exp_fixd.ads: Fix comment typos. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@133483 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-calend-vms.adb')
-rw-r--r--gcc/ada/a-calend-vms.adb16
1 files changed, 8 insertions, 8 deletions
diff --git a/gcc/ada/a-calend-vms.adb b/gcc/ada/a-calend-vms.adb
index 2fb04d501e1..89cda37c8f3 100644
--- a/gcc/ada/a-calend-vms.adb
+++ b/gcc/ada/a-calend-vms.adb
@@ -48,7 +48,7 @@ package body Ada.Calendar is
-- Because time is measured in different units and from different origins
-- on various targets, a system independent model is incorporated into
- -- Ada.Calendar. The idea behing the design is to encapsulate all target
+ -- Ada.Calendar. The idea behind the design is to encapsulate all target
-- dependent machinery in a single package, thus providing a uniform
-- interface to all existing and any potential children.
@@ -86,12 +86,12 @@ package body Ada.Calendar is
End_Date : Time;
Elapsed_Leaps : out Natural;
Next_Leap_Sec : out Time);
- -- Elapsed_Leaps is the sum of the leap seconds that have occured on or
+ -- Elapsed_Leaps is the sum of the leap seconds that have occurred on or
-- after Start_Date and before (strictly before) End_Date. Next_Leap_Sec
- -- represents the next leap second occurence on or after End_Date. If
+ -- represents the next leap second occurrence on or after End_Date. If
-- there are no leaps seconds after End_Date, End_Of_Time is returned.
-- End_Of_Time can be used as End_Date to count all the leap seconds that
- -- have occured on or after Start_Date.
+ -- have occurred on or after Start_Date.
--
-- Note: Any sub seconds of Start_Date and End_Date are discarded before
-- the calculations are done. For instance: if 113 seconds is a leap
@@ -358,7 +358,7 @@ package body Ada.Calendar is
Next_Leap_Sec := End_Of_Time;
- -- Make sure that the end date does not excede the upper bound
+ -- Make sure that the end date does not exceed the upper bound
-- of Ada time.
if End_Date > Ada_High then
@@ -387,7 +387,7 @@ package body Ada.Calendar is
end if;
-- Perform the calculations only if the start date is within the leap
- -- second occurences table.
+ -- second occurrences table.
if Start_T <= Leap_Second_Times (Leap_Seconds_Count) then
@@ -449,12 +449,12 @@ package body Ada.Calendar is
function Is_Leap (Year : Year_Number) return Boolean is
begin
- -- Leap centenial years
+ -- Leap centennial years
if Year mod 400 = 0 then
return True;
- -- Non-leap centenial years
+ -- Non-leap centennial years
elsif Year mod 100 = 0 then
return False;