diff options
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/ada/exp_ch11.adb | 7 | ||||
| -rw-r--r-- | gcc/ada/sem_ch4.adb | 4 |
3 files changed, 13 insertions, 5 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 402ad92..d4d7eb2 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -2,6 +2,13 @@ PR other/16615 + * exp_ch11.adb: Change "can not" to "cannot". + * sem_ch4.adb: Likewise. + +2019-01-09 Sandra Loosemore <sandra@codesourcery.com> + + PR other/16615 + * exp_ch9.adb: Mechanically replace "can not" with "cannot". * libgnat/s-regpat.ads: Likewise. * par-ch4.adb: Likewise. diff --git a/gcc/ada/exp_ch11.adb b/gcc/ada/exp_ch11.adb index 720c659..7296e6f 100644 --- a/gcc/ada/exp_ch11.adb +++ b/gcc/ada/exp_ch11.adb @@ -63,9 +63,10 @@ package body Exp_Ch11 is -- N is the node on which the warning is placed. procedure Warn_If_No_Propagation (N : Node_Id); - -- Called for an exception raise that is not a local raise (and thus can - -- not be optimized to a goto). Issues warning if No_Exception_Propagation - -- restriction is set. N is the node for the raise or equivalent call. + -- Called for an exception raise that is not a local raise (and thus + -- cannot be optimized to a goto). Issues warning if + -- No_Exception_Propagation restriction is set. + -- N is the node for the raise or equivalent call. --------------------------- -- Expand_At_End_Handler -- diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index 35df59d..2c40011 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -1908,8 +1908,8 @@ package body Sem_Ch4 is while Present (Op_Id) loop if Ekind (Op_Id) = E_Operator then - -- Do not consider operators declared in dead code, they can - -- not be part of the resolution. + -- Do not consider operators declared in dead code, they + -- cannot be part of the resolution. if Is_Eliminated (Op_Id) then null; |