diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-10-13 11:41:36 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-10-13 11:41:36 +0100 |
| commit | 26c7b074d5d3f0a79fab5f1c4eb28f38e81b88d2 (patch) | |
| tree | 7c097647e44e1b39f6ae15c9c9d15f3673e478d9 /proto.h | |
| parent | ad287e37d27b33d67ab22c0c8a7294f1eb467342 (diff) | |
| download | perl-26c7b074d5d3f0a79fab5f1c4eb28f38e81b88d2.tar.gz | |
Migrate common code in Perl_ckwarn() and Perl_ckwarn_d() to S_ckwarn_common()
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -6350,6 +6350,9 @@ PERL_CALLCONV void Perl_dump_sv_child(pTHX_ SV *sv) #ifdef PERL_DONT_CREATE_GVSV /* PERL_CALLCONV GV* Perl_gv_SVadd(pTHX_ GV *gv); */ #endif +#if defined(PERL_IN_UTIL_C) || defined(PERL_DECL_PROT) +STATIC bool S_ckwarn_common(pTHX_ U32 w); +#endif PERL_CALLCONV bool Perl_ckwarn(pTHX_ U32 w); PERL_CALLCONV bool Perl_ckwarn_d(pTHX_ U32 w); PERL_CALLCONV STRLEN * Perl_new_warnings_bitfield(pTHX_ STRLEN *buffer, const char *const bits, STRLEN size) |