diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-11-26 21:56:46 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-11-26 21:56:46 +0000 |
commit | 0d86688dc4cee41db564627f19bab42e3d945cb6 (patch) | |
tree | 1f2c3be8ce9f3b8de7d5f222be0b2fe34281f295 /proto.h | |
parent | ed4173efcf6003662845168e71abec2ddbd06df1 (diff) | |
download | perl-0d86688dc4cee41db564627f19bab42e3d945cb6.tar.gz |
pmtrans() and refkids() can be static in op.c.
p4raw-id: //depot/perl@34933
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -2511,18 +2511,22 @@ PERL_CALLCONV OP* Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg) #define PERL_ARGS_ASSERT_PMRUNTIME \ assert(o); assert(expr) -PERL_CALLCONV OP* Perl_pmtrans(pTHX_ OP* o, OP* expr, OP* repl) +#if defined(PERL_IN_OP_C) +STATIC OP* S_pmtrans(pTHX_ OP* o, OP* expr, OP* repl) __attribute__nonnull__(pTHX_1) __attribute__nonnull__(pTHX_2) __attribute__nonnull__(pTHX_3); #define PERL_ARGS_ASSERT_PMTRANS \ assert(o); assert(expr); assert(repl) +#endif PERL_CALLCONV void Perl_pop_scope(pTHX); PERL_CALLCONV OP* Perl_prepend_elem(pTHX_ I32 optype, OP* head, OP* tail); PERL_CALLCONV void Perl_push_scope(pTHX); /* PERL_CALLCONV OP* Perl_ref(pTHX_ OP* o, I32 type); */ -PERL_CALLCONV OP* Perl_refkids(pTHX_ OP* o, I32 type); +#if defined(PERL_IN_OP_C) +STATIC OP* S_refkids(pTHX_ OP* o, I32 type); +#endif PERL_CALLCONV void Perl_regdump(pTHX_ const regexp* r) __attribute__nonnull__(pTHX_1); #define PERL_ARGS_ASSERT_REGDUMP \ |