X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fada%2Fsem_ch9.adb;h=f9aab6a235db6a926e0c877ed205d84205552aca;hb=43537c9651f05e0ad6ba2c752dcfdfb762ef8376;hp=35c4eeebda0ba01bb304c9518daa30200680fc1a;hpb=c822fc9b51ce3de2fe06fd2dbe66f166ca0664d5;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/gcc/ada/sem_ch9.adb b/gcc/ada/sem_ch9.adb
index 35c4eeebda0..f9aab6a235d 100644
--- a/gcc/ada/sem_ch9.adb
+++ b/gcc/ada/sem_ch9.adb
@@ -953,7 +953,7 @@ package body Sem_Ch9 is
                Error_Msg_N ("entry family low bound must be '>'= ^!", D_Sdef);
             end if;
 
-            <<Skip_LB>>
+         <<Skip_LB>>
             if Is_Generic_Type (Etype (D_Sdef))
               or else In_Instance
               or else Error_Posted (D_Sdef)
@@ -979,7 +979,7 @@ package body Sem_Ch9 is
                Error_Msg_N ("entry family high bound must be '<'= ^!", D_Sdef);
             end if;
 
-            <<Skip_UB>>
+         <<Skip_UB>>
             null;
          end;
       end if;