[gcc r12-1515] [Ada] Fix typos in all occurrences of "occuring" in GNAT

[gcc r12-1515] [Ada] Fix typos in all occurrences of "occuring" in GNAT

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:e027681d90cee11d082fefb937b0233de81e9e7b

commit r12-1515-ge027681d90cee11d082fefb937b0233de81e9e7b
Author: Piotr Trojanek <trojanek@adacore.com>
Date:   Tue Mar 2 09:58:20 2021 +0100

    [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.

Diff:
---
 gcc/ada/restrict.adb | 2 +-
 gcc/ada/sem_attr.adb | 9 +++++----
 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 60faa2ac3b8..35922307460 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 83f53cdf1fb..63b0f09ea5d 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 27c50efed1c..ef87a5a3e48 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;
 
    -----------------------------------