diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-12-04 17:53:03 -0500 |
---|---|---|
committer | Steve Hay <SteveHay@planit.com> | 2006-12-05 09:41:44 +0000 |
commit | 3890ecea71e8d1097fd1d7614b8a095c06dbb4f5 (patch) | |
tree | 414640c76a224b2967fc88fa9c0563cd73b2dcb2 /win32/wince.c | |
parent | 1fa600a71f04d713560e5dadce85270a4041d8f1 (diff) | |
download | perl-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.c | 5 |
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; } |