diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-11-21 21:57:21 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-11-21 21:57:58 -0800 |
| commit | 156d738fbb36dec69a83032866786dd3b6a1c2e9 (patch) | |
| tree | a538f4a9441b726a96c027a37101201d0758ba12 /embed.fnc | |
| parent | 971c5244800c9017603979e4f5202b8e5e374b62 (diff) | |
| download | perl-156d738fbb36dec69a83032866786dd3b6a1c2e9.tar.gz | |
Put sub redef warnings in one place
The logic surrounding subroutine redefinition warnings (to warn or not
to warn?) was in three places. Over time, they drifted apart, to the
point that newXS was following completely different rules. It was
only warning for redefinition of functions in the autouse namespace.
Recent commits have brought it into conformity with the other redefi-
nition warnings.
Obviously it’s about time we put it in one function.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -1459,6 +1459,11 @@ p |void |report_evil_fh |NULLOK const GV *gv p |void |report_wrongway_fh|NULLOK const GV *gv|const char have : Used in mg.c, pp.c, pp_hot.c, regcomp.c XEpd |void |report_uninit |NULLOK const SV *uninit_sv +#if defined(PERL_IN_OP_C) || defined(PERL_IN_SV_C) +p |void |report_redefined_cv|NN const SV *name \ + |NN const CV *old_cv \ + |NULLOK SV * const *new_const_svp +#endif Apd |void |warn_sv |NN SV *baseex Afpd |void |warn |NN const char* pat|... Apd |void |vwarn |NN const char* pat|NULLOK va_list* args |