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

Re: [ID 20010823.013] Core dump new to 5.6.1

Thread Previous | Thread Next
From:
Ian Phillipps
Date:
August 26, 2001 08:03
Subject:
Re: [ID 20010823.013] Core dump new to 5.6.1
Message ID:
20010826160206.A9314@homer.diplex.co.uk
On Fri, 24 Aug 2001 at 15:52:42 -0400, Michael G Schwern wrote:
> On Fri, Aug 24, 2001 at 02:25:42PM +0100, Ian Phillipps wrote:
> > Where do I get bleadperl, or diffs 5.7.2->there? Is there an rsync
> > server?
> 
> Read the perlhack man page.  It's mentioned as perl-current.

Thanks, sorry to provoke an RTFM. I've been out of touch and I don't think
perlhack(1) was there the last time I looked.

My new bleadperl (DEVEL11741) has the bug still.
So far, I've only heard from people who don't see the bug :-(

I don't have bleadperl anywhere except on Linux/686, but Activestate 626 on W98
also shows it up.

--- Test program
#! /usr/local/src/bleadperl/perl
BEGIN {
    %actions = (
        'x' => sub {
                    eval $_[1];
                },
    );
}

$bar="OK\n";

print &{$actions{'x'}}('', '$bar' ) ;
__END__

Traceback

(gdb) backtrace 
#0  0x807cec5 in S_pad_findlex (name=0x81131c0 "$bar", newoff=0, seq=0, 
    startcv=0x811d714, cx_ix=2, saweval=0, flags=0) at op.c:248
#1  0x807d44f in Perl_pad_findmy (name=0x81131c0 "$bar") at op.c:445
#2  0x80742bd in S_pending_ident () at toke.c:5178
#3  0x8068f42 in Perl_yylex () at toke.c:2173
#4  0x807aabe in Perl_yyparse () at perly.c:1470
#5  0x80c8861 in S_doeval (gimme=1, startop=0x0) at pp_ctl.c:2908
#6  0x80ca0a3 in Perl_pp_entereval () at pp_ctl.c:3461
#7  0x80a2a83 in Perl_runops_debug () at run.c:53
#8  0x805ee15 in S_run_body (oldscope=1) at perl.c:1589
#9  0x805eb0b in perl_run (my_perl=0x8113ab0) at perl.c:1510
#10 0x805c276 in main (argc=2, argv=0xbffff894, env=0xbffff8a0)
    at perlmain.c:76
#11 0x400782eb in __libc_start_main (main=0x805c1f0 <main>, argc=2, 
    ubp_av=0xbffff894, init=0x805b3ac <_init>, fini=0x80f3f1c <_fini>, 
    rtld_fini=0x4000c130 <_dl_fini>, stack_end=0xbffff88c)
    at ../sysdeps/generic/libc-start.c:129

--
Summary of my perl5 (revision 5.0 version 7 subversion 2 patch 11741) configuration:
  Platform:
    osname=linux, osvers=2.4.5, archname=i686-linux
    uname='linux homer 2.4.5 #10 fri jun 22 02:20:21 pdt 2001 i686 unknown '
    config_args='-er'
    hint=previous, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=define
  Compiler:
    cc='cc', ccflags ='-Wall -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2 -g',
    cppflags='-Wall -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -Wall -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -Wall -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
    ccversion='', gccversion='2.95.3 20010315 (release)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lndbm -lgdbm -ldl -lm -lc -lcrypt -lutil
    perllibs=-lnsl -ldl -lm -lc -lcrypt -lutil
    libc=/lib/libc-2.2.3.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: DEBUGGING USE_LARGE_FILES
  Locally applied patches:
  	DEVEL11709
  Built under linux
  Compiled at Aug 26 2001 15:47:32
  %ENV:
    PERL5LIB="/u2/ian/lib/perl5"
  @INC:
    /usr/local/src/bleadperl/lib
    /u2/ian/lib/perl5
    /usr/local/lib/perl5/5.7.2/i686-linux
    /usr/local/lib/perl5/5.7.2
    /usr/local/lib/perl5/site_perl/5.7.2/i686-linux
    /usr/local/lib/perl5/site_perl/5.7.2
    /usr/local/lib/perl5/site_perl
    .

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