Tcl_EvalEx - tcl/tkコードリーディング

概要

TclEvalExを呼び出して、TCLコマンドを実行する。

generic/tclBasic.c

引数

• Tcl_Interp *interp TCLインタープリタへのポインター
• const char *script 実行するTCLコマンド
• int numBytes scriptの文字数。0より小さいとき、全バイトが対象。
• int flags 制御フラグ

戻り値

TCLコマンドの実行結果

処理

　TclEvalExの呼び出し
　return TclEvalEx(interp, script, numBytes, flags, 1, NULL, script);

ソース

 Tcl_EvalEx(
     [[Tcl_Interp]] *interp,		/* Interpreter in which to evaluate the
 				 * script. Also used for error reporting. */
     const char *script,		/* First character of script to evaluate. */
     int numBytes,		/* Number of bytes in script. If < 0, the
 				 * script consists of all bytes up to the
 				 * first null character. */
     int flags)			/* Collection of OR-ed bits that control the
 				 * evaluation of the script. Only
 				 * TCL_EVAL_GLOBAL is currently supported. */
 {
   return TclEvalEx(interp, script, numBytes, flags, 1, NULL, script);
 }