OSDN Git Service

2008-07-30 Robert Dewar <dewar@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 30 Jul 2008 17:38:25 +0000 (17:38 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 30 Jul 2008 17:38:25 +0000 (17:38 +0000)
* sem_ch8.adb: Minor reformatting

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@138330 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ada/sem_ch8.adb

index 6a544c0..16c79d9 100644 (file)
@@ -1598,6 +1598,7 @@ package body Sem_Ch8 is
                             & " dispatching operation", Nam);
                         return;
                   end case;
+
                exception
 
                   --  If no operation was found, and the type is limited,
@@ -1610,7 +1611,7 @@ package body Sem_Ch8 is
                            N, Prefix_Type);
                         return;
 
-                     --  Otherwise, compiler should have generated default.
+                     --  Otherwise, compiler should have generated default
 
                      else
                         raise;