summaryrefslogtreecommitdiff
path: root/win32/wince.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2006-12-04 17:53:03 -0500
committerSteve Hay <SteveHay@planit.com>2006-12-05 09:41:44 +0000
commit3890ecea71e8d1097fd1d7614b8a095c06dbb4f5 (patch)
tree414640c76a224b2967fc88fa9c0563cd73b2dcb2 /win32/wince.c
parent1fa600a71f04d713560e5dadce85270a4041d8f1 (diff)
downloadperl-3890ecea71e8d1097fd1d7614b8a095c06dbb4f5.tar.gz
Re: When should PERL_SYS_TERM() be called? [was: Re: [PATCH] Re: [PATCH] Re: [PATCH] abstract mempool header testing]
Message-ID: <4574ED1F.40508@iki.fi> Re-instates #29424 (previously reverted by #29451), now fixed to work with PERL_IMPLICIT_SYS, thanks to Jan Dubois. Also adds PERLIO_TERM to the Symbian port. p4raw-id: //depot/perl@29465
Diffstat (limited to 'win32/wince.c')
-rw-r--r--win32/wince.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/win32/wince.c b/win32/wince.c
index 6e876a8030..846a33b800 100644
--- a/win32/wince.c
+++ b/win32/wince.c
@@ -2660,11 +2660,10 @@ Perl_win32_init(int *argcp, char ***argvp)
DllExport void
Perl_win32_term(void)
{
+ dTHX;
HINTS_REFCNT_TERM;
OP_REFCNT_TERM;
- /* Can't call PERLIO_TERM here because that calls PerlMemShared_free()
- * but we're too late for that (at least when using PERL_IMPLICIT_SYS)
- * since we've already done perl_free(). */
+ PERLIO_TERM;
MALLOC_TERM;
}