155745691Smillert universal.c AOK 255745691Smillert 355745691Smillert Can't locate package %s for @%s::ISA [S_isa_lookup] 455745691Smillert 555745691Smillert 655745691Smillert 755745691Smillert__END__ 855745691Smillert# universal.c [S_isa_lookup] 9850e2753Smillertprint("SKIPPED\n# todo fix: overloading triggers spurious warnings\n"),exit; 1055745691Smillertuse warnings 'misc' ; 1155745691Smillert@ISA = qw(Joe) ; 1255745691Smillertmy $a = bless [] ; 1355745691SmillertUNIVERSAL::isa $a, Jim ; 1455745691SmillertEXPECT 1555745691SmillertCan't locate package Joe for @main::ISA at - line 5. 16*898184e3Ssthen######## 17*898184e3Ssthen# universal.c [S_isa_lookup] 18*898184e3Ssthenprint("SKIPPED\n# todo fix: overloading triggers spurious warnings\n"),exit; 19*898184e3Ssthenuse warnings 'misc' ; 20*898184e3Ssthenuse utf8; 21*898184e3Ssthenuse open qw( :utf8 :std ); 22*898184e3Ssthenpackage Ｙ; 23*898184e3Ssthen@ISA = qw(Joe) ; 24*898184e3Ssthenmy $a = bless [] ; 25*898184e3SsthenUNIVERSAL::isa $a, Jim ; 26*898184e3SsthenEXPECT 27*898184e3SsthenCan't locate package Joe for @Ｙ::ISA at - line 8. 28