Fix for Mantis bug 1928

ganelson · Apr 11, 2022 · 3713635 · 3713635
1 parent d3bf06e
commit 3713635
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 11 deletions.
diff --git a/inform7/Figures/timings-diagnostics.txt b/inform7/Figures/timings-diagnostics.txt
@@ -1,32 +1,32 @@
 100.0% in inform7 run
-     68.5% in compilation to Inter
-         48.2% in //Sequence::undertake_queued_tasks//
-          4.5% in //MajorNodes::pre_pass//
+     68.2% in compilation to Inter
+         47.6% in //Sequence::undertake_queued_tasks//
+          4.6% in //MajorNodes::pre_pass//
           3.3% in //MajorNodes::pass_1//
           2.3% in //RTPhrasebook::compile_entries//
           1.8% in //ImperativeDefinitions::assess_all//
           1.5% in //RTKindConstructors::compile//
           1.0% in //Sequence::lint_inter//
           0.5% in //MajorNodes::pass_2//
+          0.5% in //Sequence::undertake_queued_tasks//
           0.5% in //World::stage_V//
           0.4% in //ImperativeDefinitions::compile_first_block//
           0.4% in //Sequence::undertake_queued_tasks//
-          0.4% in //Sequence::undertake_queued_tasks//
           0.2% in //CompletionModule::compile//
           0.2% in //RTKindConstructors::compile_permissions//
           0.1% in //InferenceSubjects::emit_all//
           0.1% in //Task::make_built_in_kind_constructors//
           0.1% in //Understand::traverse//
           0.1% in //World::stages_II_and_III//
-          2.0% not specifically accounted for
-     28.8% in running Inter pipeline
-         10.1% in step 14/15: generate inform6 -> auto.inf
-          7.6% in step 5/15: load-binary-kits
-          6.6% in step 6/15: make-synoptic-module
+          2.1% not specifically accounted for
+     29.1% in running Inter pipeline
+         10.0% in step 14/15: generate inform6 -> auto.inf
+          7.4% in step 5/15: load-binary-kits
+          6.9% in step 6/15: make-synoptic-module
           1.5% in step 9/15: make-identifiers-unique
           0.4% in step 12/15: eliminate-redundant-operations
           0.4% in step 4/15: compile-splats
-          0.3% in step 7/15: shorten-wiring
+          0.4% in step 7/15: shorten-wiring
           0.3% in step 8/15: detect-indirect-calls
           0.2% in step 11/15: eliminate-redundant-labels
           0.1% in step 10/15: reconcile-verbs

diff --git a/inform7/Internal/Inter/WorldModelKit/Sections/Tests.i6t b/inform7/Internal/Inter/WorldModelKit/Sections/Tests.i6t
@@ -25,7 +25,7 @@ moves an object to a new position in the object tree.
 [ XAbstractSub;
     if (XTestMove(noun, second)) return;
     move noun to second;
-    "[Abstracted.]";
+    say__p = 1; "[Abstracted.]";
 ];
 
 [ XTestMove obj dest;