]> git.vpit.fr Git - perl/modules/re-engine-Hooks.git/blobdiff - Hooks.xs
Rename *comp* (resp. *exec*) to *comp_node* (resp. *exec_node*)
[perl/modules/re-engine-Hooks.git] / Hooks.xs
index b312223c08fff684b75445b2a1940a2731d85af7..10a68daa331d831b1c6df2f6e7afb0bfa0dc6e56 100644 (file)
--- a/Hooks.xs
+++ b/Hooks.xs
@@ -298,12 +298,12 @@ void reh_call_comp_begin_hook(pTHX_ regexp *rx) {
  }
 }
 
-void reh_call_comp_hook(pTHX_ regexp *rx, regnode *node) {
- REH_PRIVATE_MAP_FOREACH(cbs->comp(aTHX_ rx, node));
+void reh_call_comp_node_hook(pTHX_ regexp *rx, regnode *node) {
+ REH_PRIVATE_MAP_FOREACH(cbs->comp_node(aTHX_ rx, node));
 }
 
-void reh_call_exec_hook(pTHX_ regexp *rx, regnode *node, regmatch_info *reginfo, regmatch_state *st) {
- REH_PRIVATE_MAP_FOREACH(cbs->exec(aTHX_ rx, node, reginfo, st));
+void reh_call_exec_node_hook(pTHX_ regexp *rx, regnode *node, regmatch_info *reginfo, regmatch_state *st) {
+ REH_PRIVATE_MAP_FOREACH(cbs->exec_node(aTHX_ rx, node, reginfo, st));
 }
 
 void reh_re_free(pTHX_ REGEXP * const RX) {