diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-07 13:26:02 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-07 13:26:02 +0000 |
| commit | 28e9312590241085c4c9c616e2d59d118a216cd1 (patch) | |
| tree | 6befc7286be463c0edb384e01b62a6c535d677de /gcc/ada/exp_ch3.adb | |
| parent | a6a5aae337314592759d3b5335ebb90246a00965 (diff) | |
| download | gcc-28e9312590241085c4c9c616e2d59d118a216cd1.tar.gz | |
2010-10-07 Robert Dewar <dewar@adacore.com>
* sem_prag.adb (Analyze_Attribute_Definition_Clause, case
Component_Size): Complete previous change.
2010-10-07 Vincent Celier <celier@adacore.com>
* scng.adb (Scan): Call Accumulate_Token_Checksum for Tok_Identifier,
even for keywords, to avoid having the checksum to depend on the Ada
version.
2010-10-07 Gary Dismukes <dismukes@adacore.com>
* sem_aggr.adb, sem_ch12.adb, sem_ch6.adb, par-ch5.adb,
exp_ch3.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165106 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/exp_ch3.adb')
| -rw-r--r-- | gcc/ada/exp_ch3.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb index a304c4b14cd..7a00d39c3c3 100644 --- a/gcc/ada/exp_ch3.adb +++ b/gcc/ada/exp_ch3.adb @@ -230,7 +230,7 @@ package body Exp_Ch3 is (Typ : Entity_Id; Eq_Name : Name_Id) return Node_Id; -- Build the body of a primitive equality operation for a tagged record - -- type, or in Ada2012 for any record type that has components with a + -- type, or in Ada 2012 for any record type that has components with a -- user-defined equality. Factored out of Predefined_Primitive_Bodies. function Make_Eq_Case @@ -6174,7 +6174,7 @@ package body Exp_Ch3 is -- In the non-tagged case, ever since Ada83 an equality function must -- be provided for variant records that are not unchecked unions. - -- In Ada2012 the equality function composes, and thus must be built + -- In Ada 2012 the equality function composes, and thus must be built -- explicitly just as for tagged records. elsif Has_Discriminants (Def_Id) |