diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-23 13:08:22 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-01-23 13:08:22 +0100 |
| commit | 42f9f0fc72616b3b30aa2836e63b7b94253abca0 (patch) | |
| tree | 5c3e27ca51eaf80175180097c35812606bcffe17 /gcc/ada | |
| parent | 9eb8d5b4e9cfb5771f333abe0bfdd9667e56537b (diff) | |
| download | gcc-42f9f0fc72616b3b30aa2836e63b7b94253abca0.zip gcc-42f9f0fc72616b3b30aa2836e63b7b94253abca0.tar.gz gcc-42f9f0fc72616b3b30aa2836e63b7b94253abca0.tar.bz2 | |
Minor editing.
From-SVN: r244795
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/sem_ch13.adb | 4 | ||||
| -rw-r--r-- | gcc/ada/sem_eval.adb | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index f8078ff..5ac1c29 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -4908,7 +4908,7 @@ package body Sem_Ch13 is ("\?j?use interrupt procedure instead", N); end if; - -- Case of an address clause for a controlled object which we + -- Case of an address clause for a controlled object, which we -- consider to be erroneous. elsif Is_Controlled (Etype (U_Ent)) @@ -4923,7 +4923,7 @@ package body Sem_Ch13 is Reason => PE_Overlaid_Controlled_Object)); return; - -- Case of an address clause for a class-wide object which is + -- Case of an address clause for a class-wide object, which is -- considered erroneous. elsif Is_Class_Wide_Type (Etype (U_Ent)) then diff --git a/gcc/ada/sem_eval.adb b/gcc/ada/sem_eval.adb index 6e56e1d..5a8c27b 100644 --- a/gcc/ada/sem_eval.adb +++ b/gcc/ada/sem_eval.adb @@ -2682,7 +2682,7 @@ package body Sem_Eval is -- If the literal appears in a non-expression context, then it is -- certainly appearing in a non-static context, so check it. This is -- actually a redundant check, since Check_Non_Static_Context would - -- check it, but it seems worth while to optimize out the call. + -- check it, but it seems worthwhile to optimize out the call. -- An exception is made for a literal in an if or case expression |