[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

blead with -Dusemymalloc fails on t/comp/hints.t



Just as the title says. Dunno when it appeared.

$ ./perl -Ilib -V
Summary of my perl5 (revision 5 version 11 subversion 0 patch 34329)
configuration:
  Platform:
    osname=linux, osvers=2.6.26.3-fuuka.profvince.com,
archname=x86_64-linux-thread-multi-ld
    uname='linux fuuka 2.6.26.3-fuuka.profvince.com #1 smp tue sep 2
23:24:24 cest 2008 x86_64 intel(r) core(tm)2 duo cpu e6750 @ 2.66ghz
genuineintel gnulinux '
    config_args='-des -Dusedevel -Dusethreads -Dusemorebits -DDEBUGGING
-Doptimize=-g3 -Dman1dir=none -Dman3dir=none
-Dprefix=/home/vince/perl/builds/5.11.0@34329 -Dusemymalloc'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=define, usemultiplicity=define
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=define, use64bitall=define, uselongdouble=define
    usemymalloc=y, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DDEBUGGING
-fno-strict-aliasing -pipe -fstack-protector -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
    optimize='-g3',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DDEBUGGING
-fno-strict-aliasing -pipe -fstack-protector'
    ccversion='', gccversion='4.3.1', gccosandvers=''
    intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=8, nvtype='long double', nvsize=16,
Off_t='off_t', lseeksize=8
    alignbytes=16, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib /lib64 /usr/lib64 /usr/local/lib64
    libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
-lgdbm_compat
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=/lib/libc-2.8.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.8'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fPIC', lddlflags='-shared -g3 -L/usr/local/lib
-fstack-protector'


Characteristics of this binary (from libperl):
  Compile-time options: DEBUGGING MULTIPLICITY MYMALLOC
PERL_DONT_CREATE_GVSV
                        PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
                        PERL_TRACK_MEMPOOL USE_64_BIT_ALL USE_64_BIT_INT
                        USE_ITHREADS USE_LARGE_FILES USE_LONG_DOUBLE
                        USE_PERLIO USE_REENTRANT_API
  Locally applied patches:
        DEVEL
  Built under linux
  Compiled at Sep  9 2008 22:34:25
  @INC:
    lib
   
/home/vince/perl/builds/5.11.0@34329/lib/5.11.0/x86_64-linux-thread-multi-ld
    /home/vince/perl/builds/5.11.0@34329/lib/5.11.0
   
/home/vince/perl/builds/5.11.0@34329/lib/site_perl/5.11.0/x86_64-linux-thread-multi-ld
    /home/vince/perl/builds/5.11.0@34329/lib/site_perl/5.11.0
    .


$ gdb --args ./perl -Ilib t/comp/hints.t
GNU gdb 6.8
Copyright (C) 2008 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later
<http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.  Type "show copying"
and "show warranty" for details.
This GDB was configured as "x86_64-pc-linux-gnu"...
(gdb) r
Starting program: /tmp/perl-current/perl -Ilib t/comp/hints.t
[Thread debugging using libthread_db enabled]
1..17
ok 1 - $^H{foo} doesn't exist initially
ok 2 - $^H doesn't contain HINT_LOCALIZE_HH initially
ok 3 - $^H{foo} is now 'a'
ok 4 - $^H contains HINT_LOCALIZE_HH while compiling
ok 5 - $^H{foo} is now 'b'
ok 6 - $H^{foo} restored to 'a'
ok 7 - $^H{foo} doesn't exist while finishing compilation
ok 8 - $^H doesn't contain HINT_LOCALIZE_HH while finishing compilation
ok 9 - $^H{foo} doesn't exist when compilation complete
ok 10 - $^H doesn't contain HINT_LOCALIZE_HH when compilation complete
ok 11 - $^H{foo} doesn't exist at runtime
ok 12 - $^H doesn't contain HINT_LOCALIZE_HH at run-time
ok 13 - $^H{foo} is 'a' at eval-"" time
ok 14 - $^H contains HINT_LOCALIZE_HH at eval""-time
ok 15 - double-freeing hints hash
ok
[New Thread 0x7fee4b6226f0 (LWP 14353)]

Program received signal SIGSEGV, Segmentation fault.
[Switching to Thread 0x7fee4b6226f0 (LWP 14353)]
0x00000000004ca89a in S_hfreeentries (my_perl=0x1b7d010, hv=0x1c6cbe8)
    at hv.c:1688
1688                    if(meta->mro_linear_dfs)
SvREFCNT_dec(meta->mro_linear_dfs);
(gdb) bt
#0  0x00000000004ca89a in S_hfreeentries (my_perl=0x1b7d010, hv=0x1c6cbe8)
    at hv.c:1688
#1  0x00000000004cacd1 in Perl_hv_undef (my_perl=0x1b7d010, hv=0x1c6cbe8)
    at hv.c:1782
#2  0x0000000000534aea in Perl_sv_clear (my_perl=0x1b7d010, sv=0x1c6cbe8)
    at sv.c:5489
#3  0x0000000000535bb7 in Perl_sv_free2 (my_perl=0x1b7d010, sv=0x1c6cbe8)
    at sv.c:5686
#4  0x00000000005a1b39 in Perl_free_tmps (my_perl=0x1b7d010) at scope.c:159
#5  0x00000000004ec5c7 in Perl_pp_nextstate (my_perl=0x1b7d010) at
pp_hot.c:52
#6  0x0000000000497182 in Perl_runops_debug (my_perl=0x1b7d010) at
dump.c:1985
#7  0x00000000004df49f in S_run_body (my_perl=0x1b7d010, oldscope=1)
    at perl.c:2392
#8  0x00000000004de7c5 in perl_run (my_perl=0x1b7d010) at perl.c:2312
#9  0x0000000000421bc6 in main (argc=3, argv=0x7fff53643718,
    env=0x7fff53643738) at perlmain.c:113
(gdb)


Follow-Ups from:
Vincent Pit <perl@profvince.com>

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]