diff options
author | rwild <rwild@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-13 17:41:15 +0000 |
---|---|---|
committer | rwild <rwild@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-13 17:41:15 +0000 |
commit | 1a34e48c1d7cf4f23d39788e46f64629cddf53b9 (patch) | |
tree | d233d5950c2c7ac628ce9413ff3d59a39a79f59c /gcc/ada/sem_mech.adb | |
parent | febb409f6902e6f6fe5898499b6e4088b8b22f31 (diff) | |
download | gcc-1a34e48c1d7cf4f23d39788e46f64629cddf53b9.tar.gz |
gcc/ada/
* sem_ch10.adb, sem_ch10.ads,
sem_ch12.adb, sem_ch12.ads, sem_ch13.adb, sem_ch13.ads,
sem_ch3.adb, sem_ch4.adb, sem_ch5.adb, sem_ch6.adb,
sem_ch6.ads, sem_ch8.adb, sem_ch8.ads, sem_ch9.adb,
sem_elab.adb, sem_elab.ads, sem_elim.ads, sem_eval.adb,
sem_eval.ads, sem_intr.adb, sem_mech.adb, sem_mech.ads,
sem_prag.adb, sem_prag.ads, sem_res.adb, sem_res.ads,
sem_type.adb, sem_util.adb, sem_util.ads, sem_warn.adb,
sem_warn.ads: Fix comment typos.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134242 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_mech.adb')
-rw-r--r-- | gcc/ada/sem_mech.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/sem_mech.adb b/gcc/ada/sem_mech.adb index 62f9af85b75..177a39ca671 100644 --- a/gcc/ada/sem_mech.adb +++ b/gcc/ada/sem_mech.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1996-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 1996-2008, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -183,7 +183,7 @@ package body Sem_Mech is is begin -- Right now we only do some checks for functions returning arguments - -- by desctiptor. Probably mode checks need to be added here ??? + -- by descriptor. Probably mode checks need to be added here ??? if Mech in Descriptor_Codes and then not Is_Formal (Ent) then if Is_Record_Type (Etype (Ent)) then @@ -207,7 +207,7 @@ package body Sem_Mech is begin -- Skip this processing if inside a generic template. Not only is - -- it uneccessary (since neither extra formals nor mechanisms are + -- it unnecessary (since neither extra formals nor mechanisms are -- relevant for the template itself), but at least at the moment, -- procedures get frozen early inside a template so attempting to -- look at the formal types does not work too well if they are @@ -241,7 +241,7 @@ package body Sem_Mech is --------- -- Note: all RM defined conventions are treated the same - -- from the point of view of parameter passing mechanims + -- from the point of view of parameter passing mechanism when Convention_Ada | Convention_Intrinsic | |