1 files changed, 1 insertions, 3 deletions
diff --git a/perlio.c b/perlio.c
index 0d4231c9a0..603274e099 100644
--- a/perlio.c
+++ b/perlio.c
@@ -2399,7 +2399,7 @@ PerlIO_cleanup(pTHX)
 
 void PerlIO_teardown(pTHX) /* Call only from PERL_SYS_TERM(). */
 {
-    
+    dVAR;
 #ifdef DEBUGGING
     {
 	/* By now all filehandles should have been closed, so any
@@ -2423,8 +2423,6 @@ void PerlIO_teardown(pTHX) /* Call only from PERL_SYS_TERM(). */
     }
 }
 
-
-
 /*--------------------------------------------------------------------------------------*/
 /*
  * Bottom-most level for UNIX-like case