summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>2003-09-25 05:09:11 -0700
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-10-21 05:42:50 +0000
commit460c8493c292a94fb1fbfccbd83eba5a346ddffa (patch)
tree2de60bb359b1d21717118493de70144e576d3d0e /perl.h
parent2e3f98293bc632bc69276e1bb286833e362fffc9 (diff)
downloadperl-460c8493c292a94fb1fbfccbd83eba5a346ddffa.tar.gz
Two OS/2 portability patches from Ilya.
Subject: [PATCH 5.8.1 @21211] sockets broken on OS/2 Date: Thu, 25 Sep 2003 12:09:11 -0700 Message-ID: <20030925190911.GA27028@math.berkeley.edu> Subject: Re: [PATCH 5.8.1 @21379] tmpfile() broken on OS/2 From: Ilya Zakharevich <nospam-abuse@ilyaz.org> Date: Thu, 25 Sep 2003 19:50:45 -0700 Message-ID: <20030926025045.GA27507@math.berkeley.edu> p4raw-id: //depot/perl@21509
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h8
1 files changed, 8 insertions, 0 deletions
diff --git a/perl.h b/perl.h
index 7730f45211..16198df214 100644
--- a/perl.h
+++ b/perl.h
@@ -4294,6 +4294,14 @@ extern void moncontrol(int);
# define PIPESOCK_MODE
#endif
+#ifndef SOCKET_OPEN_MODE
+# define SOCKET_OPEN_MODE PIPESOCK_MODE
+#endif
+
+#ifndef PIPE_OPEN_MODE
+# define PIPE_OPEN_MODE PIPESOCK_MODE
+#endif
+
#define PERL_MAGIC_UTF8_CACHESIZE 2
#define PERL_UNICODE_STDIN_FLAG 0x0001