diff options
| author | Gerard Goossen <gerard@ggoossen.net> | 2009-11-12 19:00:13 +0100 |
|---|---|---|
| committer | Jan Dubois <jand@activestate.com> | 2009-11-12 17:05:56 -0800 |
| commit | f90117a9a237d776b28f3a1207f17a7eed835355 (patch) | |
| tree | da65ab847b7835e928a9663d89d87bb663edb68c /win32/perlhost.h | |
| parent | 81693ff90925b7d196d1f339fa6f85555e38cab7 (diff) | |
| download | perl-f90117a9a237d776b28f3a1207f17a7eed835355.tar.gz | |
Make win32_start_child responsible for cleaning all the scopes.
Diffstat (limited to 'win32/perlhost.h')
| -rw-r--r-- | win32/perlhost.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win32/perlhost.h b/win32/perlhost.h index d486246234..61f87659df 100644 --- a/win32/perlhost.h +++ b/win32/perlhost.h @@ -1762,7 +1762,7 @@ win32_start_child(LPVOID arg) { dJMPENV; - volatile int oldscope = PL_scopestack_ix; + volatile int oldscope = 1; /* We are responsible for all scopes */ restart: JMPENV_PUSH(status); |