From: Vincent Pit Date: Sat, 31 Mar 2012 09:45:33 +0000 (+0200) Subject: Fix the exec hook call on 5.15.5-5.15.9 X-Git-Tag: v0.02~8 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=ddc0fff25dec05b52b75b00b1ac6470b4498a6d1;p=perl%2Fmodules%2Fre-engine-Hooks.git Fix the exec hook call on 5.15.5-5.15.9 --- diff --git a/src/5015005/regexec.c b/src/5015005/regexec.c index 7c59975..56399b0 100644 --- a/src/5015005/regexec.c +++ b/src/5015005/regexec.c @@ -3163,7 +3163,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) next = NULL; state_num = OP(scan); - REH_CALL_REGEXEC_HOOK(rex, scan); + REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st); reenter_switch: assert(PL_reglastparen == &rex->lastparen); diff --git a/src/5015006/regexec.c b/src/5015006/regexec.c index 7c59975..56399b0 100644 --- a/src/5015006/regexec.c +++ b/src/5015006/regexec.c @@ -3163,7 +3163,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) next = NULL; state_num = OP(scan); - REH_CALL_REGEXEC_HOOK(rex, scan); + REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st); reenter_switch: assert(PL_reglastparen == &rex->lastparen); diff --git a/src/5015007/regexec.c b/src/5015007/regexec.c index bf30c2b..b1e5dbe 100644 --- a/src/5015007/regexec.c +++ b/src/5015007/regexec.c @@ -3173,7 +3173,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) next = NULL; state_num = OP(scan); - REH_CALL_REGEXEC_HOOK(rex, scan); + REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st); reenter_switch: assert(PL_reglastparen == &rex->lastparen); diff --git a/src/5015008/regexec.c b/src/5015008/regexec.c index 874e298..98d83da 100644 --- a/src/5015008/regexec.c +++ b/src/5015008/regexec.c @@ -3173,7 +3173,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) next = NULL; state_num = OP(scan); - REH_CALL_REGEXEC_HOOK(rex, scan); + REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st); reenter_switch: assert(PL_reglastparen == &rex->lastparen); diff --git a/src/5015009/regexec.c b/src/5015009/regexec.c index 9cd5e75..09ab948 100644 --- a/src/5015009/regexec.c +++ b/src/5015009/regexec.c @@ -3176,7 +3176,7 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog) next = NULL; state_num = OP(scan); - REH_CALL_REGEXEC_HOOK(rex, scan); + REH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st); reenter_switch: assert(PL_reglastparen == &rex->lastparen);