2312

4 files changed, 6 insertions, 5 deletions

diff --git a/046closure_name.cc b/046closure_name.cc
index 69847fd5..6671d00b 100644
--- a/046closure_name.cc
+++ b/046closure_name.cc
@@ -26,7 +26,7 @@ recipe increment-counter [
   reply y:number/space:1
 ]
 
-+name: recipe increment-counter is surrounded by new-counter
++name: lexically surrounding space for recipe increment-counter comes from new-counter
 +mem: storing 5 in location 3
 
 //: To make this work, compute the recipe that provides names for the
@@ -40,6 +40,7 @@ map<recipe_ordinal, recipe_ordinal> Surrounding_space;
 
 :(code)
 void collect_surrounding_spaces(const recipe_ordinal r) {
+  trace(9991, "transform") << "--- collect surrounding spaces for recipe " << Recipe[r].name << end();
   for (long long int i = 0; i < SIZE(Recipe[r].steps); ++i) {
     const instruction& inst = Recipe[r].steps.at(i);
     if (inst.is_label) continue;
@@ -69,7 +70,7 @@ void collect_surrounding_spaces(const recipe_ordinal r) {
         raise_error << "recipe " << Recipe[r].name << " can have only one 'surrounding' recipe but has " << Recipe[Surrounding_space[r]].name << " and " << surrounding_recipe_name << '\n' << end();
         continue;
       }
-      trace("name") << "recipe " << Recipe[r].name << " is surrounded by " << surrounding_recipe_name << end();
+      trace(9993, "name") << "lexically surrounding space for recipe " << Recipe[r].name << " comes from " << surrounding_recipe_name << end();
       Surrounding_space[r] = Recipe_ordinal[surrounding_recipe_name];
     }
   }
diff --git a/050scenario.cc b/050scenario.cc
index c2730274..f74abadc 100644
--- a/050scenario.cc
+++ b/050scenario.cc
@@ -202,7 +202,7 @@ case RUN: {
   transform_all();
   if (Trace_stream) {
     ++Trace_stream->callstack_depth;
-    trace("trace") << "run: incrementing callstack depth to " << Trace_stream->callstack_depth << end();
+    trace(9998, "trace") << "run: incrementing callstack depth to " << Trace_stream->callstack_depth << end();
     assert(Trace_stream->callstack_depth < 9000);  // 9998-101 plus cushion
   }
   Current_routine->calls.push_front(call(tmp_recipe.at(0)));
diff --git a/056recipe_header.cc b/056recipe_header.cc
index 38c7b204..0c09cb75 100644
--- a/056recipe_header.cc
+++ b/056recipe_header.cc
@@ -76,7 +76,7 @@ recipe add2 x:number, y:number -> z:number [
 void check_header_products(const recipe_ordinal r) {
   const recipe& rr = Recipe[r];
   if (rr.products.empty()) return;
-  trace("transform") << "checking reply instructions against header for " << rr.name << end();
+  trace(9991, "transform") << "--- checking reply instructions against header for " << rr.name << end();
   for (long long int i = 0; i < SIZE(rr.steps); ++i) {
     const instruction& inst = rr.steps.at(i);
     if (inst.operation != REPLY) continue;
diff --git a/081run_interactive.cc b/081run_interactive.cc
index ced4f763..f2a2e331 100644
--- a/081run_interactive.cc
+++ b/081run_interactive.cc
@@ -100,7 +100,7 @@ bool run_interactive(long long int address) {
   // and wait for it
   if (Save_trace_stream) {
     ++Save_trace_stream->callstack_depth;
-    trace("trace") << "run-interactive: incrementing callstack depth to " << Save_trace_stream->callstack_depth << end();
+    trace(9999, "trace") << "run-interactive: incrementing callstack depth to " << Save_trace_stream->callstack_depth << end();
     assert(Save_trace_stream->callstack_depth < 9000);  // 9998-101 plus cushion
   }
   Current_routine->calls.push_front(call(Recipe_ordinal["sandbox"]));