Чтобы найти ошибку на экране, поймайте, например
puts $c
#error on terminal : can't read "c": no such variable
catch {puts $c} err
puts $err # value of err 1
Есть ли способ поймать фактическое сообщение об ошибке в TCL, кроме сигнала в переменной err.