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 7c5997509b48934c18832809470d319cf81b3a12..56399b030e012687eae6fb83d7d9888961351500 100644 (file)
--- 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 7c5997509b48934c18832809470d319cf81b3a12..56399b030e012687eae6fb83d7d9888961351500 100644 (file)
--- 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 bf30c2b7c622f76c3b50ec876e5b1ebc49bc08f9..b1e5dbeb5e4be7c80694e3f789fa0accb412dda6 100644 (file)
--- 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 874e298a28f95df5480361a9a59c68623eb0a93c..98d83da2066fdc99d9450a34e4707cb727bc07ef 100644 (file)
--- 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 9cd5e7522f349a24fb3a7cee5f764a4c57a460a2..09ab948a01e5104fe3446cd81b9cd7b1c8f1f62f 100644 (file)
--- 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);