develooper Front page | perl.perl5.porters | Postings from August 2001

Re: Report /pro/3gl/CPAN/perl-current@11789

Thread Previous | Thread Next
From:
Arthur Bergman
Date:
August 30, 2001 01:14
Subject:
Re: Report /pro/3gl/CPAN/perl-current@11789
Message ID:
B7B3C26E.3682%arthur@contiller.se
01-08-30 09.01, skrev H.Merijn Brand på h.m.brand@hccnet.nl följande:

> optimize=-g:
> 
> warning: Can't find file ../lib/auto/Cwd/Cwd.sl referenced in dld_list.
> #0  0xdfc3c in Perl_pregfree (my_perl=0x40017a30, r=0x25) at regcomp.c:4564
> 4564        if (!r || (--r->refcnt > 0))
> (gdb) where
> #0  0xdfc3c in Perl_pregfree (my_perl=0x40017a30, r=0x25) at regcomp.c:4564
> #1  0x336e0 in perl_destruct (my_perl=0x40017a30) at perl.c:501
> #2  0x30a00 in main (argc=2, argv=0x7eff1264, env=0x7eff1270) at perlmain.c:78
> (gdb)


Ok, I see what the problem is. It seems like the offset of the pmop->offset
is also in the regex value.

However.

A) Why am I not seeing this.
B) Why isn't the following code doing its work.

       if(av_len((AV*) PL_regex_pad[0]) > -1) {
            repointer = av_pop((AV*)PL_regex_pad[0]);
            pmop->op_pmoffset = SvIV(repointer);
            sv_setiv(repointer,0);
        } else { 
 
-- 
Arthur


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About