diff options
| author | Craig A. Berry <craigberry@mac.com> | 2009-11-21 11:13:01 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2009-11-21 11:13:01 -0600 |
| commit | c35076938c7236fb2aaabecd40e3a5a444c3be77 (patch) | |
| tree | aee2be120fc877dcf5353c274db6658297377cab /proto.h | |
| parent | 2e05a54c0c3f7ee3e0363f0309bb362649aa71c4 (diff) | |
| download | perl-c35076938c7236fb2aaabecd40e3a5a444c3be77.tar.gz | |
Perl_pad_sv and Perl_hv_assert don't exist without -DDEBUGGING.
So let's not make them part of the API when they don't exist.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -2418,7 +2418,9 @@ PERL_CALLCONV OP* Perl_oopsHV(pTHX_ OP* o) assert(o) PERL_CALLCONV void Perl_pad_leavemy(pTHX); +#ifdef DEBUGGING PERL_CALLCONV SV* Perl_pad_sv(pTHX_ PADOFFSET po); +#endif PERL_CALLCONV void Perl_pad_free(pTHX_ PADOFFSET po); #if defined(PERL_IN_PAD_C) || defined(PERL_DECL_PROT) STATIC void S_pad_reset(pTHX); @@ -6225,10 +6227,12 @@ PERL_CALLCONV void Perl_save_set_svflags(pTHX_ SV *sv, U32 mask, U32 val) #define PERL_ARGS_ASSERT_SAVE_SET_SVFLAGS \ assert(sv) +#ifdef DEBUGGING PERL_CALLCONV void Perl_hv_assert(pTHX_ HV *hv) __attribute__nonnull__(pTHX_1); #define PERL_ARGS_ASSERT_HV_ASSERT \ assert(hv) +#endif PERL_CALLCONV SV* Perl_hv_scalar(pTHX_ HV *hv) |