diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2002-05-06 08:29:52 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2002-05-06 08:29:52 +0000 |
commit | 2daa3480a7dd37cb53ce3512b37fa29cba8590f3 (patch) | |
tree | 5d00e5740f93e01e48c7816ec0776f5cdd56d9c2 /otherlibs/unix/gethost.c | |
parent | b44e9dfa01046bcf74170e44f91411a8dc7ff4ed (diff) |
Revu detection de gethostby{name,addr}_r (PR#1144)
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4771 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/unix/gethost.c')
-rw-r--r-- | otherlibs/unix/gethost.c | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/otherlibs/unix/gethost.c b/otherlibs/unix/gethost.c index c1584ea6c..167485088 100644 --- a/otherlibs/unix/gethost.c +++ b/otherlibs/unix/gethost.c @@ -94,14 +94,6 @@ CAMLprim value unix_gethostbyaddr(value a) &h, buffer, sizeof(buffer), &hp, &h_errnop); leave_blocking_section(); if (rc != 0) hp = NULL; -#elif HAS_GETHOSTBYADDR_R == 5 - struct hostent h; - struct hostent_data hdata; - int rc; - enter_blocking_section(); - rc = gethostbyaddr_r((char *) &adr, 4, AF_INET, &h, &hdata); - leave_blocking_section(); - hp = rc == 0 ? &h : NULL; #else #ifdef GETHOSTBYADDR_IS_REENTRANT enter_blocking_section(); @@ -146,16 +138,6 @@ CAMLprim value unix_gethostbyname(value name) leave_blocking_section(); if (rc != 0) hp = NULL; } -#elif HAS_GETHOSTBYNAME_R == 3 - { - struct hostent h; - struct hostent_data hdata; - int rc; - enter_blocking_section(); - rc = gethostbyname_r(hostname, &h, &hdata); - leave_blocking_section(); - hp = rc == 0 ? &h : NULL; - } #else #ifdef GETHOSTBYNAME_IS_REENTRANT enter_blocking_section(); |