BBC: Blead Breaks Devel::Cover

[cjg-cguevara]

This is a bug report for perl from "Carlos Guevara" [email protected],
generated with the help of perlbug 1.43 running under perl 5.41.13.

---

BBC: Blead Breaks Devel::Cover

Please see http://fast-matrix.cpantesters.org/?dist=Devel-Cover

---

Flags

• category=core
• severity=low

---

Perl configuration

Site configuration information for perl 5.41.13:

Configured by cpan at Fri May 16 15:42:05 EDT 2025.

Summary of my perl5 (revision 5 version 41 subversion 13) configuration:
  Commit id: 11de3f792e035101cd109b4e92e64036fe72a4f2
  Platform:
    osname=linux
    osvers=5.14.0-570.16.1.el9_6.x86_64
    archname=x86_64-linux
    uname='linux cjg-rhel9 5.14.0-570.16.1.el9_6.x86_64 #1 smp preempt_dynamic tue apr 29 17:28:25 edt 2025 x86_64 x86_64 x86_64 gnulinux '
    config_args='-des -Dprefix=/home/cpan/bin/perl -Dscriptdir=/home/cpan/bin/perl/bin -Dusedevel -Duse64bitall'
    hint=recommended
    useposix=true
    d_sigaction=define
    useithreads=undef
    usemultiplicity=undef
    use64bitint=define
    use64bitall=define
    uselongdouble=undef
    usemymalloc=n
    default_inc_excludes_dot=define
  Compiler:
    cc='cc'
    ccflags ='-fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -D_FORTIFY_SOURCE=2'
    optimize='-O2'
    cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector-strong -I/usr/local/include'
    ccversion=''
    gccversion='11.5.0 20240719 (Red Hat 11.5.0-5)'
    gccosandvers=''
    intsize=4
    longsize=8
    ptrsize=8
    doublesize=8
    byteorder=12345678
    doublekind=3
    d_longlong=define
    longlongsize=8
    d_longdbl=define
    longdblsize=16
    longdblkind=3
    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-strong -L/usr/local/lib'
    libpth=/usr/local/lib /usr/lib /usr/lib64 /usr/local/lib64
    libs=-lpthread -ldb -ldl -lm -lcrypt -lutil -lc
    perllibs=-lpthread -ldl -lm -lcrypt -lutil -lc
    libc=/lib/../lib64/libc.so.6
    so=so
    useshrplib=false
    libperl=libperl.a
    gnulibc_version='2.34'
  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-strong'


---
@INC for perl 5.41.13:
    /home/cpan/bin/perl/lib/site_perl/5.41.13/x86_64-linux
    /home/cpan/bin/perl/lib/site_perl/5.41.13
    /home/cpan/bin/perl/lib/5.41.13/x86_64-linux
    /home/cpan/bin/perl/lib/5.41.13

---
Environment for perl 5.41.13:
    HOME=/home/cpan
    LANG=en_US.UTF-8
    LANGUAGE (unset)
    LC_ALL=C
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/home/cpan/bin/perl/bin:/home/cpan/bin:/usr/share/Modules/bin:/usr/local/bin:/usr/bin:/usr/local/sbin:/usr/sbin
    PERL_BADLANG (unset)
    SHELL=/bin/bash

[jkeenan]

Sample failure reports:

http://www.cpantesters.org/cpan/report/e90efb68-328e-11f0-91d5-8269bc79cad3

http://www.cpantesters.org/cpan/report/07864af2-2f23-11f0-a576-e3450976d56c

Bisecting with this invocation:

perl Porting/bisect.pl \
--module=Devel::Cover \
--start=40fd81cd577a103deee30cb53abded72b7f77145 \
--end=11de3f792e035101cd109b4e92e64036fe72a4f2

... pointed to 29cc805 as the breaking commit.

29cc8053c53cd1d31c48caef82b715a48368374d is the first bad commit
commit 29cc8053c53cd1d31c48caef82b715a48368374d
Author: Paul "LeoNerd" Evans <[email protected]>
Date:   Fri May 2 09:14:30 2025 +0100
Commit:     Paul Evans <[email protected]>
CommitDate: Mon May 5 17:20:02 2025 +0100

    Implement assigning xor (^^=) operator
    
    When I added '^^' I forgot to implement or test the assigning version of
    it.
    
    Also it seems `pp_xor` had the left and right arguments round the wrong
    way; but until the asymmetry introduced by this change nobody had
    noticed before. This is now fixed.
    
    Also adds `B::Deparse` support for the new assigning xor operator

 lib/B/Deparse.pm  | 15 +++++++++++----
 lib/B/Deparse.t   |  5 +++++
 op.c              |  1 +
 pod/perldelta.pod |  6 ++++++
 pod/perlop.pod    |  4 ++--
 pp_ctl.c          | 15 ++++++++++-----
 t/op/lop.t        | 10 +++++++++-
 toke.c            |  4 ++++
 8 files changed, 48 insertions(+), 12 deletions(-)
bisect found first bad commit
That took 12235 seconds.

@leonerd, @pjcj Can you take a look? Thanks.