about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--cpp/012run2
-rw-r--r--cpp/020call2
2 files changed, 3 insertions, 1 deletions
diff --git a/cpp/012run b/cpp/012run
index eec9b61c..4ffe558a 100644
--- a/cpp/012run
+++ b/cpp/012run
@@ -24,7 +24,7 @@ struct call {
   recipe_number running_recipe;
   size_t pc;
   // End Call Fields
-  call(recipe_number r) :running_recipe(r), pc(0), next_ingredient_to_process(0) {}
+  call(recipe_number r) :running_recipe(r), pc(0) {}
 };
 typedef stack<call> call_stack;
 
diff --git a/cpp/020call b/cpp/020call
index 1b40b1de..c12517c9 100644
--- a/cpp/020call
+++ b/cpp/020call
@@ -10,6 +10,8 @@ recipe f [
 :(before "End Call Fields")
 vector<vector<int> > ingredient_atoms;
 size_t next_ingredient_to_process;
+:(replace{} "call(recipe_number r)")
+call(recipe_number r) :running_recipe(r), pc(0), next_ingredient_to_process(0) {}
 
 :(replace{} "End Primitive Recipe Implementations." then "default:")
 default: {