diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-12-25 00:38:34 -0800 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-25 00:38:34 -0800 |
commit | 734856a20aec5409d22a9f2f9474a7165b0add6f (patch) | |
tree | 34856f16da7b122bb2fff2cb550216415ded0884 /sv.c | |
parent | 3825652ddfd2e6e7a10980ece6f9a732388cbecf (diff) | |
download | perl-734856a20aec5409d22a9f2f9474a7165b0add6f.tar.gz |
Add diag_listed_as for non-numeric warnings
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -1776,10 +1776,12 @@ S_not_a_number(pTHX_ SV *const sv) if (PL_op) Perl_warner(aTHX_ packWARN(WARN_NUMERIC), + /* diag_listed_as: Argument "%s" isn't numeric%s */ "Argument \"%s\" isn't numeric in %s", pv, OP_DESC(PL_op)); else Perl_warner(aTHX_ packWARN(WARN_NUMERIC), + /* diag_listed_as: Argument "%s" isn't numeric%s */ "Argument \"%s\" isn't numeric", pv); } |