diff options
-rw-r--r-- | t/anon-basic.t | 5 | ||||
-rw-r--r-- | t/bare-anon-basic.t | 5 | ||||
-rw-r--r-- | t/basic.t | 5 | ||||
-rw-r--r-- | t/impl-selection/basic-pp.t | 5 | ||||
-rw-r--r-- | t/impl-selection/basic-xs.t | 5 |
5 files changed, 20 insertions, 5 deletions
diff --git a/t/anon-basic.t b/t/anon-basic.t index 2b7575c..32f5c9c 100644 --- a/t/anon-basic.t +++ b/t/anon-basic.t @@ -246,7 +246,10 @@ ok(defined(*{ $Foo->{foo} }{ARRAY}), '... the @foo slot has NOT been removed'); is_deeply( $syms, - { zork => *{ $Foo->{zork} }{HASH} }, + { + zork => *{ $Foo->{zork} }{HASH}, + bare => *{ $Foo->{bare} }{HASH}, + }, "got the right ones", ); } diff --git a/t/bare-anon-basic.t b/t/bare-anon-basic.t index 64451aa..5bdb523 100644 --- a/t/bare-anon-basic.t +++ b/t/bare-anon-basic.t @@ -255,7 +255,10 @@ ok(defined(*{ $Foo->{foo} }{ARRAY}), '... the @foo slot has NOT been removed'); is_deeply( $syms, - { zork => *{ $Foo->{zork} }{HASH} }, + { + zork => *{ $Foo->{zork} }{HASH}, + bare => *{ $Foo->{bare} }{HASH}, + }, "got the right ones", ); } @@ -273,7 +273,10 @@ is($foo_stash->get_symbol('@foo'), $ARRAY, '... got the right values for @Foo::f is_deeply( $syms, - { zork => *{ $Foo::{zork} }{HASH} }, + { + zork => *{ $Foo::{zork} }{HASH}, + bare => *{ $Foo::{bare} }{HASH}, + }, "got the right ones", ); } diff --git a/t/impl-selection/basic-pp.t b/t/impl-selection/basic-pp.t index 5c80d09..58ff523 100644 --- a/t/impl-selection/basic-pp.t +++ b/t/impl-selection/basic-pp.t @@ -277,7 +277,10 @@ is($foo_stash->get_symbol('@foo'), $ARRAY, '... got the right values for @Foo::f is_deeply( $syms, - { zork => *{ $Foo::{zork} }{HASH} }, + { + zork => *{ $Foo::{zork} }{HASH}, + bare => *{ $Foo::{bare} }{HASH}, + }, "got the right ones", ); } diff --git a/t/impl-selection/basic-xs.t b/t/impl-selection/basic-xs.t index cb46953..8612906 100644 --- a/t/impl-selection/basic-xs.t +++ b/t/impl-selection/basic-xs.t @@ -278,7 +278,10 @@ is($foo_stash->get_symbol('@foo'), $ARRAY, '... got the right values for @Foo::f is_deeply( $syms, - { zork => *{ $Foo::{zork} }{HASH} }, + { + zork => *{ $Foo::{zork} }{HASH}, + bare => *{ $Foo::{bare} }{HASH}, + }, "got the right ones", ); } |