diff options
Diffstat (limited to 'gcc/ada/sem_ch13.adb')
| -rw-r--r-- | gcc/ada/sem_ch13.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index d0351d2..787d564 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -2009,10 +2009,10 @@ package body Sem_Ch13 is end if; -- Process Ignore_Rep_Clauses option (we also ignore rep clauses in - -- CodePeer mode or ALFA mode, since they are not relevant in these + -- CodePeer mode or Alfa mode, since they are not relevant in these -- contexts). - if Ignore_Rep_Clauses or CodePeer_Mode or ALFA_Mode then + if Ignore_Rep_Clauses or CodePeer_Mode or Alfa_Mode then case Id is -- The following should be ignored. They do not affect legality @@ -2032,7 +2032,7 @@ package body Sem_Ch13 is Rewrite (N, Make_Null_Statement (Sloc (N))); return; - -- We do not want too ignore 'Small in CodePeer_Mode or ALFA_Mode, + -- We do not want too ignore 'Small in CodePeer_Mode or Alfa_Mode, -- since it has an impact on the exact computations performed. -- Perhaps 'Small should also not be ignored by |