Tcl Catch zum Anzeigen des Prozedurnamens

Question

Sagen wir, ich habe mehrere Prozeduraufrufe in einem catch Block.

Gibt es eine Möglichkeit zu zeigen, welche dieser Prozeduren eine Ausnahme ausgelöst hat, nachdem sie abgefangen wurde?

Answer 1

Wenn Sie in der globalen Variablen errorInfo suchen, sehen Sie eine Stapelüberwachung, die die gewünschten Informationen enthält. Sie können diese Information auch erhalten, indem Sie dem catch-Aufruf nach errMsg ein zusätzliches variables Argument hinzufügen, das ein Wörterbuch geschrieben haben wird, das die Fehlerinfo-Ablaufverfolgung sowie andere Dinge (z. B. den computerlesbaren Ausnahmecode) enthält.

---

[EDIT]: In Tcl 8.6, die Ausnahme Option Wörterbuch ein Element -errorstack, die eine Beschreibung des enthält, was genannt wird. Hier ist eine interaktive Sitzung, die dies zeigt:

% proc foo {x} {error $x} 
% proc bar c {catch {puts a;foo $c} a b;return $b} 
% bar d 
a 
-code 1 -level 0 -errorstack {INNER {returnImm d {}} CALL {foo d} CALL {bar d}} -errorcode NONE -errorinfo {d 
    while executing 
"error $x" 
    (procedure "foo" line 1) 
    invoked from within 
"foo $c"} -errorline 1 

Der Fehler-Stack hat Paare von Elementen für verschiedene Dinge, aber die wichtigsten diejenigen sind die CALL Typ diejenigen, in denen das zweite Element jedes Paares ist die Liste der Argumente, die waren verwendet, um den Anruf tatsächlich zu tun. Es könnte möglich sein, davon Gebrauch zu machen, um den Namen zu erhalten. (Der Typ INNER bezieht sich auf den Ausführungszustand der Tcl-Bytecode-Engine, und ich weiß nicht, ob es andere Typen gibt.)