diff options
Diffstat (limited to 't/07-edge-cases.t')
| -rwxr-xr-x | t/07-edge-cases.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/07-edge-cases.t b/t/07-edge-cases.t index a742c76..e5928a5 100755 --- a/t/07-edge-cases.t +++ b/t/07-edge-cases.t @@ -39,4 +39,7 @@ ok(!$stash->has_package_symbol('$added'), '$added'); ok(!$stash->has_package_symbol('@added'), '@added'); ok($stash->has_package_symbol('%added'), '%added'); +my $constant = $stash->get_package_symbol('&FOO'); +is(ref($constant), 'CODE', "expanded a constant into a coderef"); + done_testing; |