OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR ada/28716 (Ada: Bind_Socket doesn't bind to specified address)

Browse Source 
2006-08-20  Laurent GUERBY  <laurent@guerby.net>

        PR ada/28716
        g-socket.adb (Bind_Socket): Call Set_Address.

From-SVN: r117092
This commit is contained in:
Laurent GUERBY 2006-09-20 20:46:28 +00:00 committed by Laurent Guerby
parent 1186ec8cd6
commit d2b40c0921
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -1,3 +1,8 @@
2006-08-20 Laurent GUERBY <laurent@guerby.net>
PR ada/28716
g-socket.adb (Bind_Socket): Call Set_Address.
2006-09-15 Eric Botcazou <ebotcazou@adacore.com>
PR ada/15802

1
gcc/ada/g-socket.adb
View File

@ -357,6 +357,7 @@ package body GNAT.Sockets is
Set_Length (Sin'Unchecked_Access, Len);
Set_Family (Sin'Unchecked_Access, Families (Address.Family));
Set_Address (Sin'Unchecked_Access, To_In_Addr (Address.Addr));
Set_Port
(Sin'Unchecked_Access,
Short_To_Network (C.unsigned_short (Address.Port)));