diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2003-09-25 05:09:11 -0700 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-10-21 05:42:50 +0000 |
| commit | 460c8493c292a94fb1fbfccbd83eba5a346ddffa (patch) | |
| tree | 2de60bb359b1d21717118493de70144e576d3d0e /doio.c | |
| parent | 2e3f98293bc632bc69276e1bb286833e362fffc9 (diff) | |
| download | perl-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 'doio.c')
| -rw-r--r-- | doio.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -937,8 +937,8 @@ Perl_do_pipe(pTHX_ SV *sv, GV *rgv, GV *wgv) if (PerlProc_pipe(fd) < 0) goto badexit; - IoIFP(rstio) = PerlIO_fdopen(fd[0], "r"PIPESOCK_MODE); - IoOFP(wstio) = PerlIO_fdopen(fd[1], "w"PIPESOCK_MODE); + IoIFP(rstio) = PerlIO_fdopen(fd[0], "r"PIPE_OPEN_MODE); + IoOFP(wstio) = PerlIO_fdopen(fd[1], "w"PIPE_OPEN_MODE); IoOFP(rstio) = IoIFP(rstio); IoIFP(wstio) = IoOFP(wstio); IoTYPE(rstio) = IoTYPE_RDONLY; |