Rename *comp* (resp. *exec*) to *comp_node* (resp. *exec_node*)

[perl/modules/re-engine-Hooks.git] / src / update.pl

diff --git a/src/update.pl b/src/update.pl
index dea38cf8531e15f29167775fd0c2071ea9cb57eb..a36c99d376cc9316a421a14086dc61c46dd2472b 100644 (file)
--- a/src/update.pl
+++ b/src/update.pl
@@ -234,7 +234,7 @@ sub patch_regcomp {
  } elsif ($line =~ /FILL_ADVANCE_NODE(_ARG)?\(\s*([^\s,\)]+)/) {
   my $shift = $1 ? 2 : 1;
   push @{$patched_chunks{$file}}, 'COMP_NODE_HOOK';
-  return $line, "    REH_CALL_REGCOMP_HOOK(pRExC_state->rx, ($2) - $shift);\n"
+  return $line, "    REH_CALL_COMP_NODE_HOOK(pRExC_state->rx, ($2) - $shift);\n"
  }
 
  return $line;
@@ -248,7 +248,7 @@ sub patch_regexec {
   return $line, "#include \"re_defs.h\"\n";
  } elsif ($line =~ /^\s*reenter_switch:\s*$/) {
   push @{$patched_chunks{$file}}, 'EXEC_NODE_HOOK';
-  return "\tREH_CALL_REGEXEC_HOOK(rex, scan, reginfo, st);\n", $line;
+  return "\tREH_CALL_EXEC_NODE_HOOK(rex, scan, reginfo, st);\n", $line;
  }
 
  return $line;