OSDN Git Service

2010-10-08 Robert Dewar <dewar@adacore.com>
[pf3gnuchains/gcc-fork.git] / gcc / ada / sem_ch6.adb
index e74aaf7..90e81f9 100644 (file)
@@ -620,8 +620,7 @@ package body Sem_Ch6 is
                   Subtype_Ind);
             end if;
 
-            --  AI05-103 : for elementary types, subtypes must statically
-            --  match.
+            --  AI05-103: for elementary types, subtypes must statically match
 
             if Is_Constrained (R_Type)
               or else Is_Access_Type (R_Type)