summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-11-23 12:50:38 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-11-24 01:45:28 -0800
commit703227f59cc3b14a9efa961724fa73bb85bb0a78 (patch)
treed641966f866db0eb3990a09c0e90c0cbe792afe2 /t
parentd31021d22e76a02635b33b5504e52db88adfc5f0 (diff)
downloadperl-703227f59cc3b14a9efa961724fa73bb85bb0a78.tar.gz
__SUB__ should warn in void context
Diffstat (limited to 't')
-rw-r--r--t/lib/warnings/op3
1 files changed, 3 insertions, 0 deletions
diff --git a/t/lib/warnings/op b/t/lib/warnings/op
index 81133fcad9..9514c395ab 100644
--- a/t/lib/warnings/op
+++ b/t/lib/warnings/op
@@ -203,6 +203,8 @@ eval { getpwuid 1 }; # OP_GPWUID
prototype "foo"; # OP_PROTOTYPE
$a ~~ $b; # OP_SMARTMATCH
$a <=> $b; # OP_NCMP
+use 5.015;
+__SUB__ # OP_RUNCV
EXPECT
Useless use of repeat (x) in void context at - line 3.
Useless use of wantarray in void context at - line 5.
@@ -244,6 +246,7 @@ Useless use of getpwuid in void context at - line 53.
Useless use of subroutine prototype in void context at - line 54.
Useless use of smart match in void context at - line 55.
Useless use of numeric comparison (<=>) in void context at - line 56.
+Useless use of __SUB__ in void context at - line 58.
########
# op.c
use warnings 'void' ; close STDIN ;