19 my $stash = Package::Stash->new('Foo');
21 @{$stash->get_or_add_symbol('@ISA')} = @ISA;
23 isa_ok(bless({}, 'Foo'), 'Bar');
32 my $stash = Package::Stash->new('Quux');
34 my $isa = $stash->get_or_add_symbol('@ISA');
36 isa_ok('Quux', 'Baz');
37 isa_ok(bless({}, 'Quux'), 'Baz');
41 my $isa = $stash->get_or_add_symbol('@ISA');
43 isa_ok('Quux', 'Bar');
44 isa_ok(bless({}, 'Quux'), 'Bar');