splice on @ISA

[p5pRT]

Migrated from rt.perl.org#78400 (status was 'resolved')

Searchable as RT78400$

[p5pRT]

From jjcassidy@gmail.com

Created by jjcassidy@gmail.com

splice @​ISA, 'Package' does not update all the caches for @​ISA.
See Florian's answer here for more detail​:
http​://stackoverflow.com/questions/3944194/is-there-a-problem-in-perl-5-12-2-using-splice-on-isa#answer-3944296

The simple test case that Florian came up with is​:
perl -E'say Foo->isa(q[Bar]) || 0; splice @​Foo​::ISA, 0, 0, q[Bar]; say
Foo->isa(q[Bar]) || 0'
0
0

Perl Info

Flags:
    category=core
    severity=high

Summary of my perl5 (revision 5 version 12 subversion 2) configuration:

  Platform:
    osname=linux, osvers=2.6.11-1.1369_fc4,
archname=x86_64-linux-thread-multi
    uname='linux perl-linux64-vm 2.6.11-1.1369_fc4 #1 thu jun 2 22:56:33 edt
2005 x86_64 x86_64 x86_64 gnulinux '
    config_args='-ders -Dcc=gcc -Dusethreads -Duseithreads -Ud_sigsetjmp
-Uinstallusrbinperl -Ulocincpth= -Uloclibpth= -Duse64bitall -Dlibpth=/lib64
/usr/lib64 /usr/local/lib64 -Accflags=-DUSE_SITECUSTOMIZE -Duselargefiles
-Accflags=-fno-merge-constants -Dprefix=/opt/ActivePerl-5.12
-Dprivlib=/opt/ActivePerl-5.12/lib -Darchlib=/opt/ActivePerl-5.12/lib
-Dsiteprefix=/opt/ActivePerl-5.12/site
-Dsitelib=/opt/ActivePerl-5.12/site/lib
-Dsitearch=/opt/ActivePerl-5.12/site/lib -Dsed=/bin/sed -Duseshrplib
-Dcf_by=ActiveState -Dcf_email=support@ActiveState.com'
    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=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE
-fno-merge-constants -fno-strict-aliasing -pipe -D_LARGEFILE_SOURCE
-D_FILE_OFFSET_BITS=64',
    optimize='-O2',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DUSE_SITECUSTOMIZE
-fno-merge-constants -fno-strict-aliasing -pipe'
    ccversion='', gccversion='4.0.0 20050519 (Red Hat 4.0.0-8)',
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='gcc', ldflags =''
    libpth=/lib64 /usr/lib64 /usr/local/lib64
    libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lpthread -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc
    libc=/lib/libc-2.3.5.so, so=so, useshrplib=true, libperl=libperl.so
    gnulibc_version='2.3.5'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E
-Wl,-rpath,/opt/ActivePerl-5.12/lib/CORE'
    cccdlflags='-fPIC', lddlflags='-shared -O2'


Characteristics of this binary (from libperl):
  Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV
                        PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP
USE_64_BIT_ALL
                        USE_64_BIT_INT USE_ITHREADS USE_LARGE_FILES
                        USE_PERLIO USE_PERL_ATOF USE_REENTRANT_API
                        USE_SITECUSTOMIZE
  Locally applied patches:
        ActivePerl Build 1202 [293621]
        1fd8fa4 Add Wolfram Humann to AUTHORS
        f120055 make string-append on win32 100 times faster
        a2a8d15 Define _USE_32BIT_TIME_T for VC6 and VC7
        007cfe1 Don't pretend to support really old VC++ compilers
        6d8f7c9 Get rid of obsolete PerlCRT.dll support
        d956618 Make Term::ReadLine::findConsole fall back to STDIN if
/dev/tty can't be opened
        321e50c Escape patch strings before embedding them in patchlevel.h
  Built under linux
  Compiled at Sep  6 2010 22:53:14
  @INC:
    /opt/ActivePerl-5.12/site/lib
    /opt/ActivePerl-5.12/lib
    .

[p5pRT]

From @rafl

Fixed in 474af99

[p5pRT]

The RT System itself - Status changed from 'new' to 'open'

[p5pRT]

@rafl - Status changed from 'open' to 'resolved'