about summary refs log tree commit diff stats
path: root/cpp/025trace
diff options
context:
space:
mode:
Diffstat (limited to 'cpp/025trace')
-rw-r--r--cpp/025trace19
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;
+}