summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-06-16 19:46:38 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-16 19:46:38 +0000
commit2986a63f7e513cf37f46db9f211b77071260031f (patch)
tree9a6e62602396938ea5a612420f53ebf267e8d941 /XSUB.h
parent87b11a197a59fac210fc9265bde0ef1ffe36de89 (diff)
downloadperl-2986a63f7e513cf37f46db9f211b77071260031f.tar.gz
NetWare port from Guruprasad S <SGURUPRASAD@novell.com>.
p4raw-id: //depot/perl@10643
Diffstat (limited to 'XSUB.h')
-rw-r--r--XSUB.h39
1 files changed, 39 insertions, 0 deletions
diff --git a/XSUB.h b/XSUB.h
index a5f8e591ad..87a05d0a6a 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -258,6 +258,15 @@ C<xsubpp>. See L<perlxs/"The VERSIONCHECK: Keyword">.
#if (defined(PERL_CAPI) || defined(PERL_IMPLICIT_SYS)) && !defined(PERL_CORE)
# ifndef NO_XSLOCKS
+# if defined (NETWARE) && defined (USE_STDIO)
+# define times PerlProc_times
+# define setuid PerlProc_setuid
+# define setgid PerlProc_setgid
+# define getpid PerlProc_getpid
+# define pause PerlProc_pause
+# define exit PerlProc_exit
+# define _exit PerlProc__exit
+# else
# undef closedir
# undef opendir
# undef stdin
@@ -273,6 +282,35 @@ C<xsubpp>. See L<perlxs/"The VERSIONCHECK: Keyword">.
# undef ungetc
# undef fileno
+//Following symbols were giving redefinition errors while building extensions - sgp 17th Oct 2000
+#ifdef NETWARE
+# undef readdir
+# undef fstat
+# undef stat
+# undef longjmp
+# undef endhostent
+# undef endnetent
+# undef endprotoent
+# undef endservent
+# undef gethostbyaddr
+# undef gethostbyname
+# undef gethostent
+# undef getnetbyaddr
+# undef getnetbyname
+# undef getnetent
+# undef getprotobyname
+# undef getprotobynumber
+# undef getprotoent
+# undef getservbyname
+# undef getservbyport
+# undef getservent
+# undef inet_ntoa
+# undef sethostent
+# undef setnetent
+# undef setprotoent
+# undef setservent
+#endif /* NETWARE */
+
# define mkdir PerlDir_mkdir
# define chdir PerlDir_chdir
# define rmdir PerlDir_rmdir
@@ -410,6 +448,7 @@ C<xsubpp>. See L<perlxs/"The VERSIONCHECK: Keyword">.
# define shutdown PerlSock_shutdown
# define socket PerlSock_socket
# define socketpair PerlSock_socketpair
+# endif /* NETWARE && USE_STDIO */
# endif /* NO_XSLOCKS */
#endif /* PERL_CAPI */