Bug#711616: libtest-refcount-perl: FTBFS with perl 5.18: test failures

[Niko Tyni]

clone 711616 -1
reassign -1 libdevel-findref-perl 1.422-1
retitle -1 libdevel-findref-perl: crash in XS_Devel__FindRef_find_ on Perl 5.18
block 711616 by -1
thanks

On Sat, Jun 08, 2013 at 12:21:56PM +0100, Dominic Hargreaves wrote:
> Source: libtest-refcount-perl
> Version: 0.07-1
> Severity: important
> User: debian-perl at lists.debian.org
> Usertags: perl-5.18-transition
> Tags: sid jessie
> 
> This package FTBFS with perl 5.18 from experimental (in a clean sbuild
> session):
> 
>    dh_auto_test
> t/00use.t ....... ok
> t/01count.t ..... 
> Failed 4/8 subtests 

This is Devel::FindRef crashing:

  $ perl -Iblib/lib -Iblib/arch t/01count.t 
  1..8
  ok 1 - anon ARRAY ref succeeds
  ok 2 - not ref fails
  ok 3 - normal object succeeds
  ok 4 - two refs to object succeeds
  Segmentation fault (core dumped)
 
Backtrace:

  Program terminated with signal 11, Segmentation fault.
  #0  0x00007f4f43a9b1f0 in XS_Devel__FindRef_find_ (my_perl=0x21f2010, cv=0x24eccf8) at FindRef.xs:172
  172                                       if (AvARRAY (pad)[0] == targ)
  (gdb) bt
  #0  0x00007f4f43a9b1f0 in XS_Devel__FindRef_find_ (my_perl=0x21f2010, cv=0x24eccf8) at FindRef.xs:172
  #1  0x00007f4f44e7b066 in Perl_pp_entersub () from /usr/lib/libperl.so.5.18
  #2  0x00007f4f44e736b6 in Perl_runops_standard () from /usr/lib/libperl.so.5.18
  #3  0x00007f4f44e0bcd1 in perl_run () from /usr/lib/libperl.so.5.18
  #4  0x0000000000400e19 in main ()
  (gdb) print pad
  $1 = (AV *) 0x4000000b00000001
 
There isn't much of a test suite in libdevel-findref-perl, but I get the same crash
with

perl -MDevel::FindRef -e 'Devel::FindRef::track( bless {}, "Some::Class" );'

I suspect it's to do with 
 http://perl5.git.perl.org/perl.git/commit/7261499db89d7afd6c64079406dc32f10acfe512
or thereabouts, but haven't verified that yet.

Cloning and blocking.
-- 
Niko Tyni   ntyni at debian.org