summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-01-04 03:17:46 -0600
committerJesse Luehrs <doy@tozt.net>2013-01-04 03:17:46 -0600
commit9c88b95a5ffba3dbcf9a416f659ad39dd4016367 (patch)
tree5263302305c1485609f007514f825ed372d00ecd
parentfccc858c772aa472d150d63514b4c46218238ca0 (diff)
downloadpackage-stash-xs-9c88b95a5ffba3dbcf9a416f659ad39dd4016367.tar.gz
package-stash-xs-9c88b95a5ffba3dbcf9a416f659ad39dd4016367.zip
sync tests
-rw-r--r--t/edge-cases.t11
1 files changed, 11 insertions, 0 deletions
diff --git a/t/edge-cases.t b/t/edge-cases.t
index 4e851c3..58c5dc8 100644
--- a/t/edge-cases.t
+++ b/t/edge-cases.t
@@ -99,4 +99,15 @@ SKIP: {
ok($stash->has_symbol('$baz'), "immortal scalars are also visible");
}
+{
+ {
+ package HasISA::Super;
+ package HasISA;
+ our @ISA = ('HasISA::Super');
+ }
+ ok(HasISA->isa('HasISA::Super'));
+ my $stash = Package::Stash->new('HasISA');
+ is_deeply([$stash->list_all_symbols('SCALAR')], []);
+}
+
done_testing;