Lines Matching full:isa

20 ok $a->isa("Bòb");
26 @ISA=qw(Hùmàn);
29 @ISA=qw(Bòb Fèmàlè);
38     our @ISA;
53 ok $a->isa("Àlìcè");
54 ok $a->isa("main::Àlìcè");    # check that alternate class names work
55 ok(("main::Àlìcè"->nèw)->isa("Àlìcè"));
57 ok $a->isa("Bòb");
58 ok $a->isa("main::Bòb");
60 ok $a->isa("Fèmàlè");
62 ok $a->isa("Hùmàn");
64 ok ! $a->isa("Màlè");
66 ok ! $a->isa('Prògràmmèr');
68 ok $a->isa("HASH");
83 ok (!Cèdrìc->isa('Prògràmmèr'));
85 ok (Cèdrìc->isa('Hùmàn'));
87 push(@Cèdrìc::ISA,'Prògràmmèr');
89 ok (Cèdrìc->isa('Prògràmmèr'));
96 ok $a->isa('Prògràmmèr');
97 ok $a->isa("Fèmàlè");
99 @Cèdrìc::ISA = qw(Bòb);
101 ok (!Cèdrìc->isa('Prògràmmèr'));
108         is UNIVERSAL::isa($vals[$p], $refs[$q]), ($p==$q or $p+$q==1);
113 ok UNIVERSAL::isa(Àlìcè => "UNIVERSAL");
126 @Bàr::ISA = 'Fòò';
132 ok( Bàr->DOES( 'Bàr' ), '... and should fall back to isa()' );
139 Bòdìnè->isa('Pìg');
144     'DOES call error message says DOES, not isa' );
152 @splàtt::ISA = 'zlòpp';
153 ok (splàtt->isa('zlòpp'));
154 ok (!splàtt->isa('plòp'));
156 # This should reset the ->isa lookup cache
157 @splàtt::ISA = 'plòp';
159 ok (!splàtt->isa('zlòpp'));
160 ok (splàtt->isa('plòp'));