summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-09-06 03:54:23 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-09-06 03:54:23 +0000
commit37bd1396ea9d91e675e031705a61835c0083b20a (patch)
treedfb571b1d1e7cdac6331b83c6a3cdef9523ce920 /pp_sys.c
parenteb6e2d6f1e269264d7937d1be23cbbe0b6820902 (diff)
downloadperl-37bd1396ea9d91e675e031705a61835c0083b20a.tar.gz
applied patch suggested by Hans Mulder to fix problems on
OPENSTEP-Mach; be more careful about PERL_POLLUTE_MALLOC when they ask for bincompat (platforms that used to default to EMBEDMYMALLOC continue to do so); disable warnings.t#192 (appears unsalvageable on some platforms) p4raw-id: //depot/perl@4085
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 3149f24d44..6c80e5ea7f 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -187,6 +187,10 @@ static char zero_but_true[ZBTLEN + 1] = "0 but true";
# include <sys/access.h>
#endif
+#if defined(HAS_FCNTL) && defined(F_SETFD) && !defined(FD_CLOEXEC)
+# define FD_CLOEXEC 1 /* NeXT needs this */
+#endif
+
#undef PERL_EFF_ACCESS_R_OK /* EFFective uid/gid ACCESS R_OK */
#undef PERL_EFF_ACCESS_W_OK
#undef PERL_EFF_ACCESS_X_OK