我々はC++でスレーブINTERPにTcl_Initを呼び出す必要があるTCLコード内で作成されたinterpの上Tcl_Initを呼び出す必要がある
Tcl_interp* master = Tcl_CreateInterp();
Tcl_Init(master);
Tcl_Eval(interp, "interp create slave");
Tcl_Interp* slave = Tcl_GetSlave(interp, "slave");
のようなコードを考えてみましょうか？
このようなスレーブインタープリタを取得すると、すでに初期化されています。初期化はinterp create slaveコマンドの実行中に行われます。そのスレーブインタプリタが使用可能になるまで、コマンドは終了しません。 Tcl_GetSlave機能が実行しているのは、コンテキストスレーブインタプリタ（これは、interp引数を使って渡しています）に対する既存のスレーブインタプリタの名前です。
あなたかもしれない（例えば、スレーブがマスターで特権操作を呼び出すことができるようにエイリアスを設定するなど）、その中にスクリプトを実行する前に、スレーブ上で、さらに設定を行うには願いが、それは常に後Tcl_Initなものとなっています。実際、Tcl_Initは、実際には、メインインタプリタからのライブラリアクセスを初期化するコンテキストからのみ呼び出されるように意図されています。通常はスレーブインタプリタから呼び出されません。
/*
*----------------------------------------------------------------------
*
* Tcl_Init --
*
* This function is typically invoked by Tcl_AppInit functions to find
* and source the "init.tcl" script, which should exist somewhere on the
* Tcl library path.
*
* Results:
* Returns a standard Tcl completion code and sets the interp's result if
* there is an error.
*
* Side effects:
* Depends on what's in the init.tcl script.
*
*----------------------------------------------------------------------
*/
TL; DR：TclのソースはこのTcl_Init機能にコメントを含めるあなたは、スレーブインタープリタにTcl_Initを呼び出す気にする必要はありません。