about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-03-14 22:52:35 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-03-14 22:52:35 -0700
commit275de0a1ced166edef6f48ab69f420d1fff77e5b (patch)
tree86358f1959cf157b38ce8c00e7e371c33ff66f6b
parent0cc8fa9af894f1d8594173f3083acf5acfbebf3a (diff)
downloadmu-275de0a1ced166edef6f48ab69f420d1fff77e5b.tar.gz
925
-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: {