[gcc r12-6464] [Ada] Balance parentheses in comments about allocators

[gcc r12-6464] [Ada] Balance parentheses in comments about allocators

[Pierre-Marie de Rodat]

https://gcc.gnu.org/g:13c0bf611a0f8dc73ac5ac463fcc6974eb55ae28

commit r12-6464-g13c0bf611a0f8dc73ac5ac463fcc6974eb55ae28
Author: Piotr Trojanek <trojanek@adacore.com>
Date:   Wed Jan 5 16:40:44 2022 +0100

    [Ada] Balance parentheses in comments about allocators
    
    gcc/ada/
    
            * sem_ch4.adb (Analyze_Allocator): Fix comment.
            * sem_eval.ads (Compile-Time Known Values): Likewise.

Diff:
---
 gcc/ada/sem_ch4.adb  | 4 ++--
 gcc/ada/sem_eval.ads | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb
index 42547e3b274..c916c215fb8 100644
--- a/gcc/ada/sem_ch4.adb
+++ b/gcc/ada/sem_ch4.adb
@@ -515,7 +515,7 @@ package body Sem_Ch4 is
             --  parameters. Note that this is now a static error even if the
             --  subprogram is not the main program (this is a change, in an
             --  earlier version only the main program was affected, and the
-            --  check had to be done in the binder.
+            --  check had to be done in the binder).
 
             if Nkind (P) = N_Subprogram_Body
               and then Nkind (Parent (P)) = N_Compilation_Unit
@@ -563,7 +563,7 @@ package body Sem_Ch4 is
          Find_Type (Subtype_Mark (E));
 
          --  Analyze the qualified expression, and apply the name resolution
-         --  rule given in  4.7(3).
+         --  rule given in 4.7(3).
 
          Analyze (E);
          Type_Id := Etype (E);
diff --git a/gcc/ada/sem_eval.ads b/gcc/ada/sem_eval.ads
index eb919f17cb4..4fdd5a1fae6 100644
--- a/gcc/ada/sem_eval.ads
+++ b/gcc/ada/sem_eval.ads
@@ -113,7 +113,7 @@ package Sem_Eval is
    --  The expression 'C' is not static in the technical RM sense, but for many
    --  simple record types, the size is in fact known at compile time. When we
    --  are trying to perform compile time constant folding (for instance for
-   --  expressions like C + 1, Is_Static_Expression or Is_OK_Static_Expression
+   --  expressions like C + 1), Is_Static_Expression or Is_OK_Static_Expression
    --  are not the right functions to test if folding is possible. Instead, we
    --  use Compile_Time_Known_Value. All static expressions that do not raise
    --  constraint error (i.e. those for which Is_OK_Static_Expression is true)