2008-08-20 Robert Dewar <dewar@adacore.com>

	* g-socket.adb: Minor reformatting

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

diff --git a/gcc/ada/g-socket.adb b/gcc/ada/g-socket.adb
index 2f729bd..0906aec 100644 (file)
--- a/gcc/ada/g-socket.adb
+++ b/gcc/ada/g-socket.adb
@@ -1281,6 +1281,7 @@ package body GNAT.Sockets is
 
    procedure Initialize (Process_Blocking_IO : Boolean) is
       Expected : constant Boolean := not SOSC.Thread_Blocking_IO;
+
    begin
       if Process_Blocking_IO /= Expected then
          raise Socket_Error with