summaryrefslogtreecommitdiff
path: root/perlio.c
diff options
context:
space:
mode:
authorMarcus Holland-Moritz <mhx-perl@gmx.net>2008-04-13 10:28:31 +0000
committerMarcus Holland-Moritz <mhx-perl@gmx.net>2008-04-13 10:28:31 +0000
commita2e578dad2f237dd09854deb3a557d2eeeb56a83 (patch)
tree058b54bd9bd3f59d678063615803e3299e0bdbb4 /perlio.c
parent4d567a5610bb49ab2426b6b49b0c4f99be2c0aa2 (diff)
downloadperl-a2e578dad2f237dd09854deb3a557d2eeeb56a83.tar.gz
Add two missing dVAR's.
p4raw-id: //depot/perl@33671
Diffstat (limited to 'perlio.c')
-rw-r--r--perlio.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/perlio.c b/perlio.c
index 4efc88d668..b935ca6b26 100644
--- a/perlio.c
+++ b/perlio.c
@@ -3131,6 +3131,9 @@ PerlIOStdio_close(pTHX_ PerlIO *f)
IV result = 0;
int saveerr = 0;
int dupfd = -1;
+#ifdef USE_ITHREADS
+ dVAR;
+#endif
#ifdef SOCKS5_VERSION_NAME
/* Socks lib overrides close() but stdio isn't linked to
that library (though we are) - so we must call close()