diff options
Diffstat (limited to '037call_reply.cc')
-rw-r--r-- | 037call_reply.cc | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/037call_reply.cc b/037call_reply.cc index a6ec8c0c..7e973ed3 100644 --- a/037call_reply.cc +++ b/037call_reply.cc @@ -20,6 +20,10 @@ Recipe_number["reply"] = REPLY; case REPLY: { const instruction& reply_inst = current_instruction(); // save pointer into recipe before pop --Callstack_depth; +//? if (tb_is_active()) { //? 1 +//? tb_clear(); //? 1 +//? cerr << Recipe[Current_routine->calls.front().running_recipe].name << ' ' << current_step_index() << '\n'; //? 1 +//? } //? 1 Current_routine->calls.pop_front(); // just in case 'main' returns a value, drop it for now if (Current_routine->calls.empty()) goto stop_running_current_routine; @@ -29,6 +33,7 @@ case REPLY: { // check that any reply ingredients with /same-as-ingredient connect up // the corresponding ingredient and product in the caller. for (long long int i = 0; i < SIZE(caller_instruction.products); ++i) { +//? cerr << Recipe[Current_routine->calls.front().running_recipe].name << '\n'; //? 1 trace(Primitive_recipe_depth, "run") << "result " << i << " is " << to_string(ingredients.at(i)); if (has_property(reply_inst.ingredients.at(i), "same-as-ingredient")) { vector<string> tmp = property(reply_inst.ingredients.at(i), "same-as-ingredient"); |