diff options
Diffstat (limited to '036call_reply.cc')
| -rw-r--r-- | 036call_reply.cc | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/036call_reply.cc b/036call_reply.cc index e43a704c..695c0910 100644 --- a/036call_reply.cc +++ b/036call_reply.cc @@ -15,7 +15,7 @@ recipe f [ :(before "End Primitive Recipe Declarations") REPLY, :(before "End Primitive Recipe Numbers") -Recipe_ordinal["reply"] = REPLY; +put(Recipe_ordinal, "reply", REPLY); :(before "End Primitive Recipe Checks") case REPLY: { break; // continue to process rest of *caller* instruction @@ -173,7 +173,7 @@ recipe test1 [ // ``` if (curr.name == "reply-if") { if (curr.products.empty()) { - curr.operation = Recipe_ordinal["jump-unless"]; + curr.operation = get(Recipe_ordinal, "jump-unless"); curr.name = "jump-unless"; vector<reagent> results; copy(++curr.ingredients.begin(), curr.ingredients.end(), inserter(results, results.end())); @@ -181,7 +181,7 @@ if (curr.name == "reply-if") { curr.ingredients.push_back(reagent("1:offset")); result.steps.push_back(curr); curr.clear(); - curr.operation = Recipe_ordinal["reply"]; + curr.operation = get(Recipe_ordinal, "reply"); curr.name = "reply"; curr.ingredients.swap(results); } @@ -196,7 +196,7 @@ if (curr.name == "reply-if") { // ``` if (curr.name == "reply-unless") { if (curr.products.empty()) { - curr.operation = Recipe_ordinal["jump-if"]; + curr.operation = get(Recipe_ordinal, "jump-if"); curr.name = "jump-if"; vector<reagent> results; copy(++curr.ingredients.begin(), curr.ingredients.end(), inserter(results, results.end())); @@ -204,7 +204,7 @@ if (curr.name == "reply-unless") { curr.ingredients.push_back(reagent("1:offset")); result.steps.push_back(curr); curr.clear(); - curr.operation = Recipe_ordinal["reply"]; + curr.operation = get(Recipe_ordinal, "reply"); curr.name = "reply"; curr.ingredients.swap(results); } |