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
}