From: ian <ian>
Date: Sat, 26 Jan 2008 00:28:02 +0000 (+0000)
Subject: show funcs in debug
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=22867c3485caf58cf167ae7f77f75194c2746ae9;p=trains.git

show funcs in debug
---

diff --git a/hostside/measure-speeds b/hostside/measure-speeds
index a0355c9..4a85507 100755
--- a/hostside/measure-speeds
+++ b/hostside/measure-speeds
@@ -146,10 +146,10 @@ proc xmit-now {} {
     set xmit_after [after 10 xmit-now]
 }
 proc xmit {nmral} {
-    global xmit_msg xmit_after detend settle_detend settle_time
+    global xmit_msg xmit_after detend settle_detend settle_time funcs_msgs
     set msg [eval [list exec ./hostside-old -s/dev/stdout] $nmral]
     set xmit_msg [hbytes raw2h $msg]
-    debug "> $xmit_msg $nmral (E $detend $settle_detend $settle_time)"
+    debug "> $xmit_msg $nmral (E $detend $settle_detend $settle_time) \[$funcs_msgs]"
     catch { after cancel $xmit_after }
     xmit-now
 }