summaryrefslogtreecommitdiff
path: root/unixish.h
diff options
context:
space:
mode:
authorLen Johnson <lenjay@ibm.net>1997-09-05 00:00:00 +0000
committerTim Bunce <Tim.Bunce@ig.co.uk>1997-09-05 00:00:00 +0000
commit60e4866f7c7e55b0493d5acd331eeebe57a211a8 (patch)
treeb91b0eabcd4a7b08a555bad0efff68d0a60b47c8 /unixish.h
parent4dee08ee8c3e1b614d202f27d0d361c6e5ada9dd (diff)
downloadperl-60e4866f7c7e55b0493d5acd331eeebe57a211a8.tar.gz
Minor changes to ease port to MVS
private-msgid: 199709162058.NAA00952@mailsun2.us.oracle.com Credited: Bud Huff <SMTP%"BAHUFF@us.oracle.com" > Credited: John Pfuntner <SMTP%"pfuntner@vnet.ibm.com" > Credited: Peter Prymmer <pvhp@forte.com>
Diffstat (limited to 'unixish.h')
-rw-r--r--unixish.h6
1 files changed, 6 insertions, 0 deletions
diff --git a/unixish.h b/unixish.h
index 4968a38329..a13e2bd86a 100644
--- a/unixish.h
+++ b/unixish.h
@@ -106,12 +106,18 @@
#define Fflush(fp) fflush(fp)
#define Mkdir(path,mode) mkdir((path),(mode))
+#ifndef PERL_SYS_INIT
#ifdef PERL_SCO5
+/* this should be set in a hint file, not here */
# define PERL_SYS_INIT(c,v) fpsetmask(0)
#else
# define PERL_SYS_INIT(c,v)
#endif
+#endif
+
+#ifndef PERL_SYS_TERM
#define PERL_SYS_TERM()
+#endif
#define BIT_BUCKET "/dev/null"