summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>1998-01-24 10:37:56 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>1998-01-24 10:37:56 +0000
commit31da6858e76569983828f43aec742159e881d627 (patch)
tree9cde3086d0382a5c42c2deadf24f7ce5242ba7d1 /pp_sys.c
parentc4f4d167adaac613328d86a8c91fbab9dc146bce (diff)
downloadperl-31da6858e76569983828f43aec742159e881d627.tar.gz
Get PerlXxx_yyyy() macro stuff to _compile_ on Solaris.
Ugh! ... Macros were unsuitable for declaring the functions, extra () round parameters removed - non-function forms of PerlXxx_yyyy() need to add () themselves. Need to include perlmem.h in util.c (at least) if not using Perl's malloc. p4raw-id: //depot/ansiperl@437
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 5307c601c9..a5de48bafe 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -3581,8 +3581,10 @@ PP(pp_ghostent)
#if defined(HAS_GETHOSTENT) && !defined(DONT_DECLARE_STD)
struct hostent *PerlSock_gethostbyname(const char *);
struct hostent *PerlSock_gethostbyaddr(const Gethbadd_addr_t, Gethbadd_alen_t, int);
+#ifndef PerlSock_gethostent
struct hostent *PerlSock_gethostent(void);
#endif
+#endif
struct hostent *hent;
unsigned long len;
@@ -3761,8 +3763,10 @@ PP(pp_gprotoent)
#ifndef DONT_DECLARE_STD
struct protoent *PerlSock_getprotobyname(const char *);
struct protoent *PerlSock_getprotobynumber(int);
+#ifndef PerlSock_getprotoent
struct protoent *PerlSock_getprotoent(void);
#endif
+#endif
struct protoent *pent;
if (which == OP_GPBYNAME)
@@ -3831,8 +3835,10 @@ PP(pp_gservent)
#ifndef DONT_DECLARE_STD
struct servent *PerlSock_getservbyname(const char *, const char *);
struct servent *PerlSock_getservbynumber();
+#ifndef PerlSock_getservent
struct servent *PerlSock_getservent(void);
#endif
+#endif
struct servent *sent;
if (which == OP_GSBYNAME) {