diff options
author | Father Chrysostomos <sprout@cpan.org> | 2017-08-27 21:48:42 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2017-08-28 12:27:05 -0700 |
commit | 5783dc5192c36d5487bd5408fd7138e9ea36d70c (patch) | |
tree | d56cb5db52cffcabbfc3f2f5fb3a335d364046e7 /op.c | |
parent | bc63756f96fd2f5f6bc046ab634053b983799876 (diff) | |
download | perl-5783dc5192c36d5487bd5408fd7138e9ea36d70c.tar.gz |
Add another param to validate_proto
I need this in order to fix bug #131883. Since it has a bit of
churn, I’m putting it in a separate commit.
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3761,7 +3761,7 @@ S_move_proto_attr(pTHX_ OP **proto, OP **attrs, const GV * name) else svname = (SV *)name; if (ckWARN(WARN_ILLEGALPROTO)) - (void)validate_proto(svname, cSVOPx_sv(new_proto), TRUE); + (void)validate_proto(svname, cSVOPx_sv(new_proto), TRUE, 0); if (*proto && ckWARN(WARN_PROTOTYPE)) { STRLEN old_len, new_len; const char * oldp = SvPV(cSVOPx_sv(*proto), old_len); |