コマンドの内容を取得する方法TCL

Question

コマンドの内容を確認したい。

コマンドの内容（それぞれのコマンドに対応するコード）を取得する方法を教えてください。

blah::do_something 

Answer 1

info bodyコマンドを使用すると、プロシージャの内容を取得できます。

% proc add {a b} { 
     return [expr {$a+$b}] 
} 
% info body add 

     return [expr {$a+$b}] 

% 

Answer 2

一般的なコマンドには意味がありません。たとえば、lsetコマンドには、いくつかのC関数に渡っていくつかの異なる実装があります。解釈されたバージョンと、バイトコードでコンパイルされたバージョンを処理するためのいくつかのバージョンと、ソースをバイトコードにコンパイルする関数があります。多くのTclコマンドはこのような内部的な複雑さを持っていますが、実際に使用されている実装方法と同じように動作します。さらに、Tclコードから見えるコマンド実装の領域にマップを提供する試みはありません。興味のあるバージョンのTclソースコードを検索するだけです。

手順は、コマンドの特別なサブクラスです。そこには、info bodyで取り出すことができるようにソースコードを保持しています。