diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-11-23 12:50:38 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-11-24 01:45:28 -0800 |
| commit | 703227f59cc3b14a9efa961724fa73bb85bb0a78 (patch) | |
| tree | d641966f866db0eb3990a09c0e90c0cbe792afe2 /op.c | |
| parent | d31021d22e76a02635b33b5504e52db88adfc5f0 (diff) | |
| download | perl-703227f59cc3b14a9efa961724fa73bb85bb0a78.tar.gz | |
__SUB__ should warn in void context
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -1114,6 +1114,7 @@ Perl_scalarvoid(pTHX_ OP *o) case OP_GGRGID: case OP_GETLOGIN: case OP_PROTOTYPE: + case OP_RUNCV: func_ops: if (!(o->op_private & (OPpLVAL_INTRO|OPpOUR_INTRO))) /* Otherwise it's "Useless use of grep iterator" */ |