diff options
Diffstat (limited to 't')
| -rw-r--r-- | t/op/smartmatch.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/op/smartmatch.t b/t/op/smartmatch.t index 7736269f6b..c480e0e14d 100644 --- a/t/op/smartmatch.t +++ b/t/op/smartmatch.t @@ -220,8 +220,12 @@ __DATA__ @ undef \&fatal @ 1 \&fatal @ [1] \&fatal +@ {a=>1} \&fatal @ "foo" \&fatal @ qr// \&fatal +# sub is not called on empty hashes / arrays + [] \&fatal + +{} \&fatal # - null-prototyped subs ! undef \&FALSE |