[perl #122443] Failure to debug programs using threads::shared in 5.18.2

On Thu Jul 31 13:03:12 2014, chr.stahlhut@gmail.com wrote:
> On Wed Jul 30 14:30:54 2014, chr.stahlhut@gmail.com wrote:
> > Calling the attached program via 'perl -d ./debug-me.pl' now causes
> > the debugger to fail
> 
> I just discovered that this is failure to RTM on my part: Explicitly
> calling the debugger with threads enabled via 'perl -dt ./debug-me.pl'
> (mind the 't'!) works fine.
> (I wonder why it worked without the 't' in 5.16 though...)

Anyone want to take a crack at Christian's question?

> 
> Sorry for the noise,
> Christian

I confirmed Christian's observation (as follows), so the RT can formally be closed.

#####
$ ./perl -Ilib -V
Summary of my perl5 (revision 5 version 21 subversion 3) configuration:
  Commit id: a74ff37d56a36f313c3eec2c8f99167b0c7a28d9
  Platform:
    osname=linux, osvers=2.6.32-358.el6.x86_64, archname=x86_64-linux-thread-multi
    uname='linux dromedary-001.ams6.corp.booking.com 2.6.32-358.el6.x86_64 #1 smp fri feb 22 00:31:26 utc 2013 x86_64 x86_64 x86_64 gnulinux '
    config_args='-des -Dusedevel -Dusethreads'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=define, usemultiplicity=define
    use64bitint=define, use64bitall=define, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2',
    optimize='-O2',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
    ccversion='', gccversion='4.4.7 20120313 (Red Hat 4.4.7-4)', 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='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -fstack-protector -L/usr/local/lib'
    libpth=/usr/local/lib /usr/lib /lib/../lib64 /usr/lib/../lib64 /lib /lib64 /usr/lib64 /usr/local/lib64
    libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=libc-2.12.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.12'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-protector'


Characteristics of this binary (from libperl): 
  Compile-time options: HAS_TIMES MULTIPLICITY PERLIO_LAYERS
                        PERL_DONT_CREATE_GVSV
                        PERL_HASH_FUNC_ONE_AT_A_TIME_HARD
                        PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
                        PERL_NEW_COPY_ON_WRITE PERL_PRESERVE_IVUV
                        PERL_USE_DEVEL USE_64_BIT_ALL USE_64_BIT_INT
                        USE_ITHREADS USE_LARGE_FILES USE_LOCALE
                        USE_LOCALE_COLLATE USE_LOCALE_CTYPE
                        USE_LOCALE_NUMERIC USE_LOCALE_TIME USE_PERLIO
                        USE_PERL_ATOF USE_REENTRANT_API
  Built under linux
  Compiled at Aug  1 2014 03:07:14
  %ENV:
    PERLBREW_BASHRC_VERSION="0.63"
    PERLBREW_HOME="/home/jkeenan/.perlbrew"
    PERLBREW_ROOT="/home/jkeenan/perl5/perlbrew"
    PERL_WORKDIR="perl"
  @INC:
    lib
    /usr/local/lib/perl5/site_perl/5.21.3/x86_64-linux-thread-multi
    /usr/local/lib/perl5/site_perl/5.21.3
    /usr/local/lib/perl5/5.21.3/x86_64-linux-thread-multi
    /usr/local/lib/perl5/5.21.3
    /usr/local/lib/perl5/site_perl
    .
[dromedary-001:perl] 1011 $ ./perl -Ilib -dt ~/p5p/122443-debug-me.pl 
Threads support enabled

Loading DB routines from perl5db.pl version 1.45
Editor support available.

Enter h or 'h h' for help, or 'man perldebug' for more help.

main::(/home/jkeenan/p5p/122443-debug-me.pl:6):
6:	print "I want to be debugged. :-(\n";
 [0] DB<1> c
I want to be debugged. :-(
Debugged program terminated.  Use q to quit or R to restart,
use o inhibit_exit to avoid stopping after program termination,
h q, h R or h o to get additional info.
 [0] DB<0> q
#####

---
via perlbug:  queue: perl5 status: new
https://rt.perl.org/Ticket/Display.html?id=122443

• [perl #122443] Failure to debug programs using threads::shared in 5.18.2 by Christian Stahlhut via RT
• [perl #122443] Failure to debug programs using threads::shared in 5.18.2 by James E Keenan via RT
• [perl #122443] Failure to debug programs using threads::shared in 5.18.2 by Christian Stahlhut