about summary refs log tree commit diff stats
path: root/035call_ingredient.cc
diff options
context:
space:
mode:
Diffstat (limited to '035call_ingredient.cc')
-rw-r--r--035call_ingredient.cc6
1 files changed, 5 insertions, 1 deletions
diff --git a/035call_ingredient.cc b/035call_ingredient.cc
index a56510d6..c8f6d75a 100644
--- a/035call_ingredient.cc
+++ b/035call_ingredient.cc
@@ -22,13 +22,17 @@ recipe f [
 
 :(before "End call Fields")
 vector<vector<double> > ingredient_atoms;
+vector<type_tree*> ingredient_types;
 long long int next_ingredient_to_process;
 :(before "End call Constructor")
 next_ingredient_to_process = 0;
 
-:(after "call_housekeeping:")
+:(before "End Call Housekeeping")
 for (long long int i = 0; i < SIZE(ingredients); ++i) {
   Current_routine->calls.front().ingredient_atoms.push_back(ingredients.at(i));
+  if (SIZE(Current_routine->calls) > 1)
+    Current_routine->calls.front().ingredient_types.push_back(call_instruction.ingredients.at(i).type);
+  // todo: else function is main and ingredient_type is string
 }
 
 :(before "End Primitive Recipe Declarations")