tcl, как выполнить команду, в каком файле и в какой строке?

Question

как узнать, когда я получаю сценарий tcl, какой proc/eval выполняется, в каком файле и в какой строке?

ниже мой код:

       set counts     [info frame];
 set frame_list [info frame [expr {$counts - 2}] ]   ; #for cmd type is "eval"
 set frame_list [info frame [expr {$counts - 1}] ]   ; #for cmd type is other like "source"
 [dict get $frame_list file] # to get file
 [dict get $frame_list line] # to get line in file

но когда-нибудь в скрипте есть внутренняя оценка в файле, пусть Frame_list получит информацию об уровне ошибки. как позволить tcl получить правильный файл и строку?