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

概要

名前解決スキーム用リンクリスト

typedef int (Tcl_ResolveCompiledVarProc)([[Tcl_Interp]] *interp, CONST84 char *name, int length, Tcl_[[Namespace]] *context, Tcl_ResolvedVarInfo **rPtr);
typedef int (Tcl_ResolveVarProc)(Tcl_Interp *interp, CONST84 char *name, Tcl_Namespace *context, int flags, Tcl_Var *rPtr);
typedef int (Tcl_ResolveCmdProc)(Tcl_Interp *interp, CONST84 char *name, Tcl_Namespace *context, int flags, Tcl_[[Command]] *rPtr);

メンバー

• char *name; スキーム名
• Tcl_ResolveCmdProc *cmdResProc; 名前解決のための手続き
• Tcl_ResolveVarProc *varResProc; 実行時にのみハンドルされる変数の名前解決用手続き
• Tcl_ResolveCompiledVarProc *compiledVarResProc; コンパイルじの名前解決の手続き
• struct ResolverScheme *nextPtr; 次の ResolverScheme へのポインタ

ソース

 /*
  * The interpreter keeps a linked list of name resolution schemes. The scheme
  * for a namespace is consulted first, followed by the list of schemes in an
  * interpreter, followed by the default name resolution in Tcl. Schemes are
  * added/removed from the interpreter's list by calling Tcl_AddInterpResolver
  * and Tcl_RemoveInterpResolver.
  */
 
 typedef struct ResolverScheme {
     char *name;			/* Name identifying this scheme. */
     Tcl_ResolveCmdProc *cmdResProc;
 				/* Procedure handling command name
 				 * resolution. */
     Tcl_ResolveVarProc *varResProc;
 				/* Procedure handling variable name resolution
 				 * for variables that can only be handled at
 				 * runtime. */
     Tcl_ResolveCompiledVarProc *compiledVarResProc;
 				/* Procedure handling variable name resolution
 				 * at compile time. */
 
     struct ResolverScheme *nextPtr;
 				/* Pointer to next record in linked list. */
 } ResolverScheme;