diff options
Diffstat (limited to 'gcc/ada/g-socthi.ads')
| -rw-r--r-- | gcc/ada/g-socthi.ads | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/g-socthi.ads b/gcc/ada/g-socthi.ads index 65660e3ce47..e54d59c6a57 100644 --- a/gcc/ada/g-socthi.ads +++ b/gcc/ada/g-socthi.ads @@ -117,8 +117,9 @@ package GNAT.Sockets.Thin is Optval : System.Address; Optlen : not null access C.int) return C.int; - function C_Inet_Addr - (Cp : C.Strings.chars_ptr) return C.int; + function Inet_Aton + (Cp : C.Strings.chars_ptr; + Inp : System.Address) return C.int; function C_Ioctl (S : C.int; @@ -251,7 +252,7 @@ private pragma Import (C, C_Getpeername, "getpeername"); pragma Import (C, C_Getsockname, "getsockname"); pragma Import (C, C_Getsockopt, "getsockopt"); - pragma Import (C, C_Inet_Addr, "inet_addr"); + pragma Import (C, Inet_Aton, "inet_aton"); pragma Import (C, C_Listen, "listen"); pragma Import (C, C_Readv, "readv"); pragma Import (C, C_Select, "select"); |