FAQ

Jeffrey Friedl writes:
Running this program with 5.6.0 segfaults during the exit() call.
This same script on NT segfaults also from an invalid pointer read at
scope.c:825. Maybe this Purify traceback will help:

Perl_leave_scope [scope.c:825]
ptr = (void*)&PL_curpad[SSPOPLONG];
sv = *(SV**)ptr;
/* Can clear pad variable in place? */
=> if (SvREFCNT(sv) <= 1 && !SvOBJECT(sv)) {
if (SvTHINKFIRST(sv))
sv_force_normal(sv);
if (SvMAGICAL(sv))
Perl_pop_scope [scope.c:144]
{
dTHR;
I32 oldsave = PL_scopestack[--PL_scopestack_ix];
=> LEAVE_SCOPE(oldsave);
}

void
S_my_exit_jump [perl.c:3672]
if (cxstack_ix > 0)
dounwind(0);
POPBLOCK(cx,PL_curpm);
=> LEAVE;
}

JMPENV_JUMP(2);
Perl_my_exit [perl.c:3622]
STATUS_NATIVE_SET(status);
break;
}
=> my_exit_jump();
}

void
Perl_pp_exit [pp_ctl.c:2472]
#endif
}
PL_exit_flags |= PERL_EXIT_EXPECTED;
=> my_exit(anum);
PUSHs(&PL_sv_undef);
RETURN;
}
Perl_runops_debug [run.c:56]
S_regmatch [re_exec.c:2307]
S_regtry [re_exec.c:1715]
my_regexec [re_exec.c:1509]
Perl_pp_match [pp_hot.c:1027]

====================================================
Mark Leighton Fisher Thomson Consumer Electronics
fisherm@tce.com Indianapolis, IN, USA
"Display some adaptability." -- Doug Shaftoe, _Cryptonomicon_

Search Discussions

Related Discussions

Discussion Navigation
viewthread | post
Discussion Overview
groupperl5-porters @
categoriesperl
postedAug 10, '00 at 5:38p
activeAug 10, '00 at 5:38p
posts1
users1
websiteperl.org

1 user in discussion

Fisher Mark: 1 post

People

Translate

site design / logo © 2021 Grokbase