Front page | perl.perl5.porters |
Postings from October 1999
From: Ilya Zakharevich <ilya@math.ohio-state.edu>
Larry W. Virden writes:
> Current function is Perl_re_intuit_start
> 371 CHR_SVLEN(prog->check_substr) +
> (SvTAIL(prog->check_substr) != 0);
And may I ask what is the reason for segfault? What is the
contents
of prog->check_substr? Keep in mind
#define CHR_SVLEN(sv) (UTF ? sv_len_utf8(sv) : SvCUR(sv))
and I suspect you do not use utf8, right?
Current function is Perl_re_intuit_start
371 CHR_SVLEN(prog->check_substr) +
(SvTAIL(prog->check_substr) != 0);
(dbx 1) print prog->check_substr
dbx: can't find field "check_substr" in "*(prog)"
(dbx 2) print UTF
dbx: "UTF" is not defined in the scope
`perl`regexec.c`Perl_re_intuit_start`
dbx: see `help scope' for details
(dbx 3) print sv
sv = 0x41e504
(dbx 4) print *sv
*sv = {
sv_any = 0x5aeb08
sv_refcnt = 1U
sv_flags = 67372295U
}
(dbx 5) print SvCUR(sv)
dbx: "SvCUR" is not defined in the scope
`perl`regexec.c`Perl_re_intuit_start`
Unfortunately, I'm not familiar enough with Perl's internals to
figure out how to dig out the real info here...
--
Larry W. Virden <URL: mailto:lvirden@cas.org> Windows is not the
answer, but
<URL: http://www.purl.org/NET/lvirden/> the question. No
is the answer.
Unless explicitly stated to the contrary, nothing in this posting
should be construed as representing my employer's opinions.
Thread Previous
|
Thread Next