diff options
| author | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-04-02 15:25:18 +0000 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-04-02 15:25:18 +0000 |
| commit | dc45a647708b6c5442e1362e6b6e7a2583c30346 (patch) | |
| tree | 77eb71f3ede3b243141f6874d47e94606370b5f1 /perlsock.h | |
| parent | 67ce88566282df78bad77aeb9c4b93768bda70aa (diff) | |
| download | perl-dc45a647708b6c5442e1362e6b6e7a2583c30346.tar.gz | |
Andy Dougherty's configuration patches (Config_63-01 up to 04).
p4raw-id: //depot/perl@845
Diffstat (limited to 'perlsock.h')
| -rw-r--r-- | perlsock.h | 19 |
1 files changed, 16 insertions, 3 deletions
diff --git a/perlsock.h b/perlsock.h index 1a147f9479..dc1a374f71 100644 --- a/perlsock.h +++ b/perlsock.h @@ -10,17 +10,30 @@ #define PerlSock_accept(s, a, l) accept(s, a, l) #define PerlSock_bind(s, n, l) bind(s, n, l) #define PerlSock_connect(s, n, l) connect(s, n, l) + #define PerlSock_gethostbyaddr(a, l, t) gethostbyaddr(a, l, t) #define PerlSock_gethostbyname(n) gethostbyname(n) -#define PerlSock_gethostent() gethostent() +#define PerlSock_gethostent gethostent +#define PerlSock_endhostent endhostent #define PerlSock_gethostname(n, l) gethostname(n, l) + +#define PerlSock_getnetbyaddr(n, t) getnetbyaddr(n, t) +#define PerlSock_getnetbyname(n) getnetbyname(n) +#define PerlSock_getnetent getnetent +#define PerlSock_endnetent endnetent + #define PerlSock_getpeername(s, n, l) getpeername(s, n, l) + #define PerlSock_getprotobyname(n) getprotobyname(n) #define PerlSock_getprotobynumber(n) getprotobynumber(n) -#define PerlSock_getprotoent() getprotoent() +#define PerlSock_getprotoent getprotoent +#define PerlSock_endprotoent endprotoent + #define PerlSock_getservbyname(n, p) getservbyname(n, p) #define PerlSock_getservbyport(port, p) getservbyport(port, p) -#define PerlSock_getservent() getservent() +#define PerlSock_getservent getservent +#define PerlSock_endservent endservent + #define PerlSock_getsockname(s, n, l) getsockname(s, n, l) #define PerlSock_getsockopt(s, l, n, v, i) getsockopt(s, l, n, v, i) #define PerlSock_listen(s, b) listen(s, b) |