summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2002-05-09 16:40:39 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2002-05-09 16:40:39 +0000
commitb5ac89c3e91fc5e73ab09acd099240e5aaa213a5 (patch)
tree8a6af29c877dca43df7acdd44a951e56df047d31 /pp_sys.c
parent2c646907d8be3abcfdbcb890fa5c8ca825c7ce91 (diff)
downloadperl-b5ac89c3e91fc5e73ab09acd099240e5aaa213a5.tar.gz
Integrate maint branch io (pipe) fixes. (changes#16329,16330,16331)
p4raw-link: @16331 on //depot/maint-5.6/perl: 821302ef08e28e13ed846e63b71b1a8e0bd6e09a p4raw-link: @16330 on //depot/maint-5.6/perl: 32b5515015764ee3e189442094a83142675fbf9b p4raw-link: @16329 on //depot/maint-5.6/perl: 5676c1b12073c1e0625a9800fba3bbcb4a2e99c8 p4raw-id: //depot/perl@16528 p4raw-integrated: from //depot/maint-5.6/perl@16527 'merge in' pp_sys.c (@12026..) p4raw-integrated: from //depot/maint-5.6/perl@16331 'merge in' util.c (@16329..) p4raw-integrated: from //depot/maint-5.6/perl@16330 'merge in' doio.c (@14704..)
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/pp_sys.c b/pp_sys.c
index d4da064135..a7e89a70c3 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -608,6 +608,7 @@ PP(pp_pipe_op)
IoIFP(rstio) = PerlIO_fdopen(fd[0], "r");
IoOFP(wstio) = PerlIO_fdopen(fd[1], "w");
+ IoOFP(rstio) = IoIFP(rstio);
IoIFP(wstio) = IoOFP(wstio);
IoTYPE(rstio) = IoTYPE_RDONLY;
IoTYPE(wstio) = IoTYPE_WRONLY;