diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2021-03-02 09:58:20 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-06-16 04:43:03 -0400 |
| commit | e027681d90cee11d082fefb937b0233de81e9e7b (patch) | |
| tree | c26591914ed1ba6e52cc07a0da2c1fff32b6827d | |
| parent | 7ef1d8e88bb7aa9fa148a63bec25b740b5d997c8 (diff) | |
| download | gcc-e027681d90cee11d082fefb937b0233de81e9e7b.zip gcc-e027681d90cee11d082fefb937b0233de81e9e7b.tar.gz gcc-e027681d90cee11d082fefb937b0233de81e9e7b.tar.bz2 | |
[Ada] Fix typos in all occurrences of "occuring" in GNAT
gcc/ada/
* restrict.adb, sem_attr.adb, types.ads: Fix typos in
"occuring"; refill comment as necessary.
| -rw-r--r-- | gcc/ada/restrict.adb | 2 | ||||
| -rw-r--r-- | gcc/ada/sem_attr.adb | 9 | ||||
| -rw-r--r-- | gcc/ada/types.ads | 2 |
3 files changed, 7 insertions, 6 deletions
diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index 60faa2a..3592230 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -66,7 +66,7 @@ package body Restrict is No_Specification_Of_Aspects : array (Aspect_Id) of Source_Ptr := (others => No_Location); - -- Entries in this array are set to point to a previously occuring pragma + -- Entries in this array are set to point to a previously occurring pragma -- that activates a No_Specification_Of_Aspect check. No_Specification_Of_Aspect_Warning : array (Aspect_Id) of Boolean := diff --git a/gcc/ada/sem_attr.adb b/gcc/ada/sem_attr.adb index 83f53cd..63b0f09 100644 --- a/gcc/ada/sem_attr.adb +++ b/gcc/ada/sem_attr.adb @@ -10751,10 +10751,11 @@ package body Sem_Attr is Nm : Node_Id; Note : Boolean := True; - -- Skip this for the case of Unrestricted_Access occuring in - -- the context of a Valid check, since this otherwise leads - -- to a missed warning (the Valid check does not really - -- modify!) If this case, Note will be reset to False. + -- Skip this for the case of Unrestricted_Access occurring + -- in the context of a Valid check, since this otherwise + -- leads to a missed warning (the Valid check does not + -- really modify!) If this case, Note will be reset to + -- False. -- Skip it as well if the type is an Access_To_Constant, -- given that no use of the value can modify the prefix. diff --git a/gcc/ada/types.ads b/gcc/ada/types.ads index 27c50ef..ef87a5a 100644 --- a/gcc/ada/types.ads +++ b/gcc/ada/types.ads @@ -773,7 +773,7 @@ package Types is Overflow_Mode_Assertions : Overflow_Mode_Type; -- This field indicates the mode for handling code generation and -- overflow checking (if enabled) for intermediate expression values. - -- This applies to any expression occuring inside assertions. + -- This applies to any expression occurring inside assertions. end record; ----------------------------------- |