diff options
Diffstat (limited to 'cpp/025trace')
-rw-r--r-- | cpp/025trace | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/cpp/025trace b/cpp/025trace new file mode 100644 index 00000000..bd05d848 --- /dev/null +++ b/cpp/025trace @@ -0,0 +1,19 @@ +:(scenario "trace") +recipe main [ + trace [foo], [this is a trace in mu] +] ++foo: this is a trace in mu + +:(before "End Primitive Recipe Declarations") +TRACE, +:(before "End Primitive Recipe Numbers") +Recipe_number["trace"] = TRACE; +:(before "End Primitive Recipe Implementations") +case TRACE: { + assert(isa_literal(instructions[pc].ingredients[0])); + string label = instructions[pc].ingredients[0].name; + assert(isa_literal(instructions[pc].ingredients[1])); + string message = instructions[pc].ingredients[1].name; + trace(label) << message; + break; +} |