Commit 6bfee077 by Robert Dewar Committed by Arnaud Charlet

g-socket.adb: Minor reformatting

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

	* g-socket.adb: Minor reformatting

From-SVN: r139274
parent cf5028e3
......@@ -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
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment