summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2010-08-16 20:22:42 +0100
committerFlorian Ragwitz <rafl@debian.org>2010-08-26 15:10:55 +0200
commit1a0a2ba99e0c0ff795f145aaf54fcf0c4a8f7478 (patch)
treef24669c95c6d89ac6f5277dac7f3518afc1cd5e1 /proto.h
parentc35dcbe240980301d3462300f3b790ccfbe52c24 (diff)
downloadperl-1a0a2ba99e0c0ff795f145aaf54fcf0c4a8f7478.tar.gz
make recursive part of peephole optimiser hookable
New variable PL_rpeepp makes it possible for extensions to hook the per-op-chain part of the peephole optimiser (which recurses into side chains). The existing variable PL_peepp still allows hooking the per-sub part of the peephole optimiser, maintaining perfect backward compatibility.
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/proto.h b/proto.h
index 034f67344a..2c5df53f8f 100644
--- a/proto.h
+++ b/proto.h
@@ -2572,6 +2572,7 @@ STATIC void S_pad_reset(pTHX);
#endif
PERL_CALLCONV void Perl_pad_swipe(pTHX_ PADOFFSET po, bool refadjust);
PERL_CALLCONV void Perl_peep(pTHX_ OP* o);
+PERL_CALLCONV void Perl_rpeep(pTHX_ OP* o);
PERL_CALLCONV PerlIO* Perl_start_glob(pTHX_ SV *tmpglob, IO *io)
__attribute__nonnull__(pTHX_1)
__attribute__nonnull__(pTHX_2);