projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 085e731) | patch
When we open a file and pass it along to PerlIO, be sure to enter the
authorCraig A. Berry <craigberry@mac.com>
Mon, 30 Oct 2006 00:33:34 +0000 (00:33 +0000)
committerCraig A. Berry <craigberry@mac.com>
Mon, 30 Oct 2006 00:33:34 +0000 (00:33 +0000)
commit7f8ddb16e020167ce98c1281b23751a06033b224
tree537854baa2952bbf4233c7d6606f273892939adctree | snapshot
parent085e731f54b0044b320e296e710d73b7205fdf7acommit | diff
When we open a file and pass it along to PerlIO, be sure to enter the
PerlIO world via Unix I/O.  If you start from stdio, a Unix I/O counter
will get decremented on close even though it was never incremented (and
may not even exist).  Exposed by #29065.

p4raw-id: //depot/perl@29144
vms/ext/Stdio/Stdio.xs diff | blob | history
Domain: System / Base;