FAQ
# New Ticket Created by (Andreas J. Koenig)
# Please include the string: [perl #122251]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=122251 >


git bisect
----------
commit 29e61fd971cd4373e17cf1dd6e954ddea5171299
Author: David Mitchell <davem@iabyn.com>
Date: Fri Jun 27 11:52:44 2014 +0100

     add op_lastsib and -DPERL_OP_PARENT

diagnostics
-----------
Running Build test
t/Module-Info.t .......... 1/59 # Failed test (t/Module-Info.t at line 82)
# got: '4'
# expected: '3'
# Failed test (t/Module-Info.t at line 83)
# Structures begin differing at:
# $got->[3] = 'Subroutine B::OP::parent redefined at blib/lib/B/BUtils.pm line 217.'
# $expected->[3] = Does not exist
# Failed test (t/Module-Info.t at line 88)
# got: '4'
# expected: '3'
# Failed test (t/Module-Info.t at line 89)
# got: undef
# expected: '0.35'
t/Module-Info.t .......... 14/59 # Failed test (t/Module-Info.t at line 185)
# got: '3'
# expected: '2'
# Failed test (t/Module-Info.t at line 186)
# Failed test (t/Module-Info.t at line 189)
# got: '3'
# expected: '2'
# Failed test (t/Module-Info.t at line 190)
# got: 'Illegal division by zero at -e line 1.'
# expected: '7.254'
t/Module-Info.t .......... 56/59 # Looks like you failed 8 tests of 59.
t/Module-Info.t .......... Dubious, test returned 8 (wstat 2048, 0x800)
Failed 8/59 subtests

perl -V
-------
Summary of my perl5 (revision 5 version 21 subversion 2) configuration:
   Commit id: 29e61fd971cd4373e17cf1dd6e954ddea5171299
   Platform:
     osname=linux, osvers=3.14-1-amd64, archname=x86_64-linux
     uname='linux k83 3.14-1-amd64 #1 smp debian 3.14.5-1 (2014-06-05) x86_64 gnulinux '
     config_args='-Dprefix=/home/sand/src/perl/repoperls/installed-perls/perl/v5.21.1-127-g29e61fd/165a -Dmyhostname=k83 -Dinstallusrbinperl=n -Uversiononly -Dusedevel -des -Ui_db -Uuseithreads -Uuselongdouble -DDEBUGGING=-g'
     hint=recommended, useposix=true, d_sigaction=define
     useithreads=undef, usemultiplicity=undef
     use64bitint=define, use64bitall=define, uselongdouble=undef
     usemymalloc=n, bincompat5005=undef
   Compiler:
     cc='cc', ccflags ='-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 -g',
     cppflags='-fwrapv -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include'
     ccversion='', gccversion='4.8.3', 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/gcc/x86_64-linux-gnu/4.8/include-fixed /usr/include/x86_64-linux-gnu /usr/lib /lib/x86_64-linux-gnu /lib/../lib /usr/lib/x86_64-linux-gnu /usr/lib/../lib /lib
     libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
     perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
     libc=libc-2.19.so, so=so, useshrplib=false, libperl=libperl.a
     gnulibc_version='2.19'
   Dynamic Linking:
     dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
     cccdlflags='-fPIC', lddlflags='-shared -O2 -g -L/usr/local/lib -fstack-protector'


Characteristics of this binary (from libperl):
   Compile-time options: HAS_TIMES PERLIO_LAYERS PERL_DONT_CREATE_GVSV
                         PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_MALLOC_WRAP
                         PERL_NEW_COPY_ON_WRITE PERL_PRESERVE_IVUV
                         PERL_USE_DEVEL USE_64_BIT_ALL USE_64_BIT_INT
                         USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
                         USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_PERLIO
                         USE_PERL_ATOF
   Built under linux
   Compiled at Jul 9 2014 07:53:35
   @INC:
     /home/sand/src/perl/repoperls/installed-perls/perl/v5.21.1-127-g29e61fd/165a/lib/site_perl/5.21.2/x86_64-linux
     /home/sand/src/perl/repoperls/installed-perls/perl/v5.21.1-127-g29e61fd/165a/lib/site_perl/5.21.2
     /home/sand/src/perl/repoperls/installed-perls/perl/v5.21.1-127-g29e61fd/165a/lib/5.21.2/x86_64-linux
     /home/sand/src/perl/repoperls/installed-perls/perl/v5.21.1-127-g29e61fd/165a/lib/5.21.2
     .


--
andreas

Search Discussions

  • James E Keenan via RT at Jul 9, 2014 at 11:56 am

    On Tue Jul 08 23:39:34 2014, andreas.koenig.7os6vvqr@franz.ak.mind.de wrote:
    git bisect
    ----------
    commit 29e61fd971cd4373e17cf1dd6e954ddea5171299
    Author: David Mitchell <davem@iabyn.com>
    Date: Fri Jun 27 11:52:44 2014 +0100

    add op_lastsib and -DPERL_OP_PARENT

    diagnostics
    -----------
    Running Build test
    t/Module-Info.t .......... 1/59 # Failed test (t/Module-Info.t at
    line 82)
    # got: '4'
    # expected: '3'
    # Failed test (t/Module-Info.t at line 83)
    # Structures begin differing at:
    # $got->[3] = 'Subroutine B::OP::parent redefined at
    blib/lib/B/BUtils.pm line 217.'
    # $expected->[3] = Does not exist
    # Failed test (t/Module-Info.t at line 88)
    # got: '4'
    # expected: '3'
    # Failed test (t/Module-Info.t at line 89)
    # got: undef
    # expected: '0.35'
    t/Module-Info.t .......... 14/59 # Failed test (t/Module-Info.t at
    line 185)
    # got: '3'
    # expected: '2'
    # Failed test (t/Module-Info.t at line 186)
    # Failed test (t/Module-Info.t at line 189)
    # got: '3'
    # expected: '2'
    # Failed test (t/Module-Info.t at line 190)
    # got: 'Illegal division by zero at -e line 1.'
    # expected: '7.254'
    t/Module-Info.t .......... 56/59 # Looks like you failed 8 tests of
    59.
    t/Module-Info.t .......... Dubious, test returned 8 (wstat 2048,
    0x800)
    Failed 8/59 subtests
    I tried to confirm this failure and could not, even though I tried building with both Makefile and Build.PL. Please see attachment.

    Moreover, as Module-Info contains no .xs that I could locate, I would not expect it to show new failures at the commit in question.

    Thank you very much.
    Jim Keenan

    ---
    via perlbug: queue: perl5 status: new
    https://rt.perl.org/Ticket/Display.html?id=122251
  • Dagfinn Ilmari Mannsåker at Jul 9, 2014 at 1:40 pm

    "James E Keenan via RT" <perlbug-followup@perl.org> writes:
    On Tue Jul 08 23:39:34 2014, andreas.koenig.7os6vvqr@franz.ak.mind.de wrote:
    git bisect
    ----------
    commit 29e61fd971cd4373e17cf1dd6e954ddea5171299
    Author: David Mitchell <davem@iabyn.com>
    Date: Fri Jun 27 11:52:44 2014 +0100

    add op_lastsib and -DPERL_OP_PARENT

    diagnostics
    -----------
    Running Build test
    t/Module-Info.t .......... 1/59 # Failed test (t/Module-Info.t at
    line 82)
    # got: '4'
    # expected: '3'
    # Failed test (t/Module-Info.t at line 83)
    # Structures begin differing at:
    # $got->[3] = 'Subroutine B::OP::parent redefined at
    blib/lib/B/BUtils.pm line 217.'
    https://metacpan.org/source/MBARBON/Module-Info-0.35/lib/B/BUtils.pm#L217
    Moreover, as Module-Info contains no .xs that I could locate, I would
    not expect it to show new failures at the commit in question.
    Well, it does define its own B::OP::parent method, which was also added
    in the offending commit, so it's not really surprising if you actually
    read the warning and the line of code it's coming from. Because of the
    way it calls a separate perl process:

          @out = `$command 2>&1`;

    (https://metacpan.org/source/MBARBON/Module-Info-0.35/lib/B/BUtils.pm#L217)

    that warning will be intermingled with the normal output.

    --
    "A disappointingly low fraction of the human race is,
      at any given time, on fire." - Stig Sandbeck Mathisen
  • Dave Mitchell at Jul 9, 2014 at 2:40 pm

    On Wed, Jul 09, 2014 at 02:40:14PM +0100, Dagfinn Ilmari Mannsåker wrote:
    "James E Keenan via RT" <perlbug-followup@perl.org> writes:
    On Tue Jul 08 23:39:34 2014, andreas.koenig.7os6vvqr@franz.ak.mind.de wrote:
    git bisect
    ----------
    commit 29e61fd971cd4373e17cf1dd6e954ddea5171299
    Author: David Mitchell <davem@iabyn.com>
    Date: Fri Jun 27 11:52:44 2014 +0100

    add op_lastsib and -DPERL_OP_PARENT

    diagnostics
    -----------
    Running Build test
    t/Module-Info.t .......... 1/59 # Failed test (t/Module-Info.t at
    line 82)
    # got: '4'
    # expected: '3'
    # Failed test (t/Module-Info.t at line 83)
    # Structures begin differing at:
    # $got->[3] = 'Subroutine B::OP::parent redefined at
    blib/lib/B/BUtils.pm line 217.'
    https://metacpan.org/source/MBARBON/Module-Info-0.35/lib/B/BUtils.pm#L217
    Moreover, as Module-Info contains no .xs that I could locate, I would
    not expect it to show new failures at the commit in question.
    Well, it does define its own B::OP::parent method, which was also added
    in the offending commit, so it's not really surprising
    Looking a bit further, it appears that the B::Util in Module-Info is a
    fork of the CPAN B::Util module, and both define a B::OP::parent method,
    which is a bit naughty of them.

    Perhaps the best approach is for the B::Util author(s) to make their
    B::OP::parent method available only if the same method doesn't already
    exist in B, or if it exists but perl was'nt built with -DPERL_OP_PARENT
    (in which case the builtin B::OP::parent always just returns NULL.)

    --
    "Do not dabble in paradox, Edward, it puts you in danger of fortuitous wit."
         -- Lady Croom, "Arcadia"

Related Discussions

Discussion Navigation
viewthread | post
Discussion Overview
groupperl5-porters @
categoriesperl
postedJul 9, '14 at 6:39a
activeJul 9, '14 at 2:40p
posts4
users3
websiteperl.org

People

Translate

site design / logo © 2021 Grokbase