From d1b6bf721ad0fafb5a1632854990581d1c7c00d6 Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Wed, 30 Dec 2015 14:18:05 +0000 Subject: convert CX_PUSHLOOP*/POPLOOP to inline fns Replace CX_PUSHLOOP_FOR() with cx_pushfloop_for() etc. --- embed.fnc | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'embed.fnc') diff --git a/embed.fnc b/embed.fnc index bd0ae356df..61a4bad47a 100644 --- a/embed.fnc +++ b/embed.fnc @@ -2895,6 +2895,10 @@ AiM |void |cx_popformat |NN PERL_CONTEXT *cx AiM |void |cx_pusheval |NN PERL_CONTEXT *cx \ |NULLOK OP *retop|NULLOK SV *namesv AiM |void |cx_popeval |NN PERL_CONTEXT *cx +AiM |void |cx_pushloop_plain|NN PERL_CONTEXT *cx +AiM |void |cx_pushloop_for |NN PERL_CONTEXT *cx \ + |NN void *itervarp|NULLOK SV *itersave +AiM |void |cx_poploop |NN PERL_CONTEXT *cx #endif : ex: set ts=8 sts=4 sw=4 noet: -- cgit v1.2.1