From 55dba26bfd2c49bbd07e4da95179a53ce5c163a8 Mon Sep 17 00:00:00 2001
From: "Konstantin Kirik (snegovick)" <snegovick@uprojects.org>
Date: Thu, 25 Dec 2025 17:09:35 +0300
Subject: Add logger to control debug printing from single point

---
 appl/lib/sh9parser.b | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'appl/lib/sh9parser.b')

diff --git a/appl/lib/sh9parser.b b/appl/lib/sh9parser.b
index 9f83354..75fe2e9 100644
--- a/appl/lib/sh9parser.b
+++ b/appl/lib/sh9parser.b
@@ -204,8 +204,8 @@ parse_toks(toks: array of ref TokNode, g: array of ref GrammarNode, debug_printi
     lt := len toks;
     if (debug_printing) {
       sys->print("Loop %d: ", ctr);
+      print_toks_short(toks);
     }
-    print_toks_short(toks);
     ctr ++;
     changed = 0;
     fast: for (i := 0; i < lt; i ++) {
-- 
cgit v1.2.3