diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 10:45:28 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-04-20 10:45:28 +0000 |
commit | 1469afd665e2628b6505fea115daec4b2b3bbff7 (patch) | |
tree | abccfec98396bda557b30cfec0ba8b9cbd863c15 /gcc/ada/g-socthi.ads | |
parent | 60ca8da9bac8217dd8cf253418650878c47b8af5 (diff) | |
download | gcc-1469afd665e2628b6505fea115daec4b2b3bbff7.tar.gz |
2009-04-20 Thomas Quinot <quinot@adacore.com>
* socket.c, g-socthi-vms.adb, g-socthi-vms.ads, g-socthi-vxworks.ads,
s-oscons-tmplt.c, gsocket.h, g-socthi-mingw.ads, g-socthi.ads,
g-sothco.ads (__gnat_inet_pton): Needs to be enabled for HP-UX as well,
since HP-UX supports neither inet_aton nor inet_pton (altough the
latter is part of the Single UNIX Specification!).
So reorganize code, and share C implementation based on inet_addr(3)
with VMS (instead of having a VMS specific Ada implementation in
g-socthi-vms.adb).
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146396 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/g-socthi.ads')
-rw-r--r-- | gcc/ada/g-socthi.ads | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/gcc/ada/g-socthi.ads b/gcc/ada/g-socthi.ads index 720efcdee95..303a942d385 100644 --- a/gcc/ada/g-socthi.ads +++ b/gcc/ada/g-socthi.ads @@ -117,11 +117,6 @@ package GNAT.Sockets.Thin is Optval : System.Address; Optlen : not null access C.int) return C.int; - function Inet_Pton - (Af : C.int; - Cp : C.Strings.chars_ptr; - Inp : System.Address) return C.int; - function C_Ioctl (S : C.int; Req : C.int; @@ -253,7 +248,6 @@ private pragma Import (C, C_Getpeername, "getpeername"); pragma Import (C, C_Getsockname, "getsockname"); pragma Import (C, C_Getsockopt, "getsockopt"); - pragma Import (C, Inet_Pton, "inet_pton"); pragma Import (C, C_Listen, "listen"); pragma Import (C, C_Readv, "readv"); pragma Import (C, C_Select, "select"); |