Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

use base / our @ISA clash #1399

Closed
p5pRT opened this issue Mar 21, 2000 · 2 comments
Closed

use base / our @ISA clash #1399

p5pRT opened this issue Mar 21, 2000 · 2 comments

Comments

@p5pRT
Copy link

p5pRT commented Mar 21, 2000

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

Searchable as RT2496$

@p5pRT
Copy link
Author

p5pRT commented Mar 21, 2000

From @sciurius

Created by @sciurius

There's a conflict between 'use base' and 'our @​ISA'. This program
does what it should do (print "Yes"), unless the line with 'our @​ISA'
is uncommented. This took me days to isolate...

A "use vars '@​ISA'" has the same effect.

  use strict;
  my $p = new Pkg;
  print STDERR ("Yes\n") if $p->isa("Foo");

  package Foo;
  sub new { bless {}, 'Foo' }

  package Pkg;
  # our @​ISA;
  use base 'Foo';
  sub new { bless {}, 'Pkg' };

Perl Info

Flags:
    category=core
    severity=medium

Site configuration information for perl v5.6.0:

Configured by johanv at Tue Mar 21 13:12:38 MET 2000.

Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration:
  Platform:
    osname=linux, osvers=2.2.14, archname=i386-linux
    uname='linux plume.nl.compuware.com 2.2.14 #2 mon jan 31 08:13:15 met 2000 i686 unknown '
    config_args='-des -Darchname=i386-linux -Dd_dosuid -Dprefix=/opt/perl-5.6.0-RC3'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=undef d_sfio=undef uselargefiles=define 
    use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef
  Compiler:
    cc='cc', optimize='-O2', gccversion=egcs-2.91.66 19990314/Linux (egcs-1.1.2 release)
    cppflags='-fno-strict-aliasing -I/usr/local/include'
    ccflags ='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64'
    stdchar='char', d_stdstdio=define, usevfork=false
    intsize=4, longsize=4, ptrsize=4, doublesize=8
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
    libc=/lib/libc-2.1.2.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'

Locally applied patches:
    v5.6.0-RC3


@INC for perl v5.6.0:
    /opt/perl-5.6.0-RC3/lib/5.6.0/i386-linux
    /opt/perl-5.6.0-RC3/lib/5.6.0
    /opt/perl-5.6.0-RC3/lib/site_perl/5.6.0/i386-linux
    /opt/perl-5.6.0-RC3/lib/site_perl/5.6.0
    /opt/perl-5.6.0-RC3/lib/site_perl
    .


Environment for perl v5.6.0:
    HOME=/home/johanv
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/opt/perl56/bin:.:/home/johanv/bin:/usr/local/bin:/bin:/usr/bin:/usr/X11R6/bin
    PERL_BADLANG (unset)
    SHELL=/bin/csh


@p5pRT
Copy link
Author

p5pRT commented Mar 22, 2000

From @schwern

I reproduced the bug using 5.6.0RC3 and its base.pm. Class​::Fields's
base.pm doesn't have the problem. I don't see anything in 5.6.0's
base.pm that immediately LEAPS out at me... I'll look into it.

--

Michael G Schwern http​://www.pobox.com/~schwern/ schwern@​pobox.com
At the doctor's office
Winter wheat and water mix
I walk funny now.
  -- ignatz

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant