diff options
Diffstat (limited to 'gcc/ada/g-socket.adb')
| -rw-r--r-- | gcc/ada/g-socket.adb | 20 |
1 files changed, 9 insertions, 11 deletions
diff --git a/gcc/ada/g-socket.adb b/gcc/ada/g-socket.adb index b58a0dc20c0..3b794b72930 100644 --- a/gcc/ada/g-socket.adb +++ b/gcc/ada/g-socket.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- $Revision: 1.21 $ +-- $Revision$ -- -- -- Copyright (C) 2001 Ada Core Technologies, Inc. -- -- -- @@ -166,12 +166,11 @@ package body GNAT.Sockets is -- Types needed for Datagram_Socket_Stream_Type - type Datagram_Socket_Stream_Type is new Root_Stream_Type with - record - Socket : Socket_Type; - To : Sock_Addr_Type; - From : Sock_Addr_Type; - end record; + type Datagram_Socket_Stream_Type is new Root_Stream_Type with record + Socket : Socket_Type; + To : Sock_Addr_Type; + From : Sock_Addr_Type; + end record; type Datagram_Socket_Stream_Access is access all Datagram_Socket_Stream_Type; @@ -187,10 +186,9 @@ package body GNAT.Sockets is -- Types needed for Stream_Socket_Stream_Type - type Stream_Socket_Stream_Type is new Root_Stream_Type with - record - Socket : Socket_Type; - end record; + type Stream_Socket_Stream_Type is new Root_Stream_Type with record + Socket : Socket_Type; + end record; type Stream_Socket_Stream_Access is access all Stream_Socket_Stream_Type; |