From: Steve Hay <SteveHay@planit.com>
Date: Thu, 30 Nov 2006 09:45:47 +0000 (+0000)
Subject: I think #29060 / #29073 missed this
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bc10eb633bcfd88cfe28820712157caa4e11a418;p=p5sagit%2Fp5-mst-13.2.git

I think #29060 / #29073 missed this

p4raw-id: //depot/perl@29424
---

diff --git a/win32/win32.c b/win32/win32.c
index 31a54a9..a7c409f 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -4902,8 +4902,10 @@ Perl_win32_init(int *argcp, char ***argvp)
 void
 Perl_win32_term(void)
 {
+    dTHX;
     HINTS_REFCNT_TERM;
     OP_REFCNT_TERM;
+    PERLIO_TERM;
     MALLOC_TERM;
 }
 
diff --git a/win32/wince.c b/win32/wince.c
index 52d9507..846a33b 100644
--- a/win32/wince.c
+++ b/win32/wince.c
@@ -2660,8 +2660,10 @@ Perl_win32_init(int *argcp, char ***argvp)
 DllExport void
 Perl_win32_term(void)
 {
+    dTHX;
     HINTS_REFCNT_TERM;
     OP_REFCNT_TERM;
+    PERLIO_TERM;
     MALLOC_TERM;
 }