diff options
| author | Gary Dismukes <dismukes@adacore.com> | 2020-04-03 14:19:43 -0400 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-16 09:07:13 -0400 |
| commit | 93b0021d8c1478a2de07db6ffc7d0cab052b83a1 (patch) | |
| tree | 010e0fc4a8f0245c847411b36151090d664cf26a /gcc | |
| parent | 55153b7b4d19bbafadacd23e2b8cd1f21f1dcee1 (diff) | |
| download | gcc-93b0021d8c1478a2de07db6ffc7d0cab052b83a1.zip gcc-93b0021d8c1478a2de07db6ffc7d0cab052b83a1.tar.gz gcc-93b0021d8c1478a2de07db6ffc7d0cab052b83a1.tar.bz2 | |
[Ada] Fix two typos
2020-06-16 Gary Dismukes <dismukes@adacore.com>
gcc/ada/
* sem_ch6.adb: Add closing paren in a comment.
* sem_util.adb: Correct comment typo (aggreate => aggregate).
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/sem_ch6.adb | 2 | ||||
| -rw-r--r-- | gcc/ada/sem_util.adb | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index 8ff017a..188ee75 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -1269,7 +1269,7 @@ package body Sem_Ch6 is -- only once, i.e. not to the simple return statement generated at -- the end of its expansion because, prior to leaving the function, -- the accessibility level of the return object changes to be a level - -- determined by the point of call (RM 3.10.2(10.8/3). + -- determined by the point of call (RM 3.10.2(10.8/3)). if Ada_Version >= Ada_2005 and then Ekind (R_Type) = E_Anonymous_Access_Type diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index dd9ab2e..366eaff 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -17042,7 +17042,7 @@ package body Sem_Util is return Ada_Version >= Ada_2012 and then Is_Object_Reference (Expression (N)); - -- In Ada 95 an aggreate is an object reference + -- In Ada 95 an aggregate is an object reference when N_Aggregate => return Ada_Version >= Ada_95; |