diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2006-12-17 16:45:24 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-12-18 13:34:00 +0000 |
| commit | 9d419b5f6925ac8219b490513f2c0e4f2d7c7f74 (patch) | |
| tree | ade0148247a1332511a5db94e9ff95d8b80c9b4b /util.c | |
| parent | dbf3bb275a8c67f06df1e6e24df320e3d78b2d60 (diff) | |
| download | perl-9d419b5f6925ac8219b490513f2c0e4f2d7c7f74.tar.gz | |
OS/2-specific fixes, round II
Message-ID: <20061218084524.GA14866@powdermilk.math.berkeley.edu>
p4raw-id: //depot/perl@29580
Diffstat (limited to 'util.c')
| -rw-r--r-- | util.c | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -2267,8 +2267,12 @@ Perl_my_popen_list(pTHX_ char *mode, int n, SV **args) PerlLIO_close(pp[0]); return PerlIO_fdopen(p[This], mode); #else +# ifdef OS2 /* Same, without fork()ing and all extra overhead... */ + return my_syspopen4(aTHX_ Nullch, mode, n, args); +# else Perl_croak(aTHX_ "List form of piped open not implemented"); return (PerlIO *) NULL; +# endif #endif } |