OSDN Git Service

Minor reformatting.
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 2 Aug 2011 09:24:53 +0000 (09:24 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 2 Aug 2011 09:24:53 +0000 (09:24 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177106 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ada/sem_attr.adb
gcc/ada/sem_res.adb

index aadcb04..c841288 100644 (file)
@@ -2064,7 +2064,7 @@ package body Sem_Attr is
       end if;
 
       --  In SPARK or ALFA, attributes of private types are only allowed if
-      --  the full type declaration is visible
+      --  the full type declaration is visible.
 
       if Formal_Verification_Mode
         and then Comes_From_Source (Original_Node (N))
index cc88f43..dc62ef7 100644 (file)
@@ -7613,8 +7613,8 @@ package body Sem_Res is
               ("string operand for concatenation should be a literal", N);
          end if;
 
-         --  Do not issue error on an operand that is neither a character nor
-         --  a string, as the error is issued in Resolve_Op_Concat.
+      --  Do not issue error on an operand that is neither a character nor a
+      --  string, as the error is issued in Resolve_Op_Concat.
 
       else
          null;