diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-04-20 16:44:13 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-04-20 16:44:13 (GMT) |
| commit | 1bbd13e8395085f6afe23f0ac7d7cc91eae3cade (patch) | |
| tree | deba5d0dcb60194537aea304ca412bd52ef3c1b6 /generic/tclCompile.h | |
| parent | 66032e8a327e0498b0d8970307452f66c69be25c (diff) | |
| parent | 049650b5952e5e5ee1997772750450305dccc6d7 (diff) | |
| download | tcl-1bbd13e8395085f6afe23f0ac7d7cc91eae3cade.zip tcl-1bbd13e8395085f6afe23f0ac7d7cc91eae3cade.tar.gz tcl-1bbd13e8395085f6afe23f0ac7d7cc91eae3cade.tar.bz2 | |
Merge 8.6.5little
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index ce20f4a..a59b194 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -1013,12 +1013,6 @@ typedef struct ForeachInfo { * LAST FIELD IN THE STRUCTURE! */ } ForeachInfo; -MODULE_SCOPE const AuxDataType tclForeachInfoType; -MODULE_SCOPE const AuxDataType tclNewForeachInfoType; - -#define FOREACHINFO(envPtr, index) \ - ((ForeachInfo*)((envPtr)->auxDataArrayPtr[TclGetUInt4AtPtr(index)].clientData)) - /* * Structure used to hold information about a switch command that is needed * during program execution. These structures are stored in CompileEnv and @@ -1051,11 +1045,6 @@ typedef struct { * STRUCTURE. */ } DictUpdateInfo; -MODULE_SCOPE const AuxDataType tclDictUpdateInfoType; - -#define DICTUPDATEINFO(envPtr, index) \ - ((DictUpdateInfo*)((envPtr)->auxDataArrayPtr[TclGetUInt4AtPtr(index)].clientData)) - /* * ClientData type used by the math operator commands. */ @@ -1141,7 +1130,6 @@ MODULE_SCOPE void TclExpandJumpFixupArray(JumpFixupArray *fixupArrayPtr); MODULE_SCOPE int TclNRExecuteByteCode(Tcl_Interp *interp, ByteCode *codePtr); MODULE_SCOPE Tcl_Obj * TclFetchLiteral(CompileEnv *envPtr, unsigned int index); -MODULE_SCOPE void TclFinalizeAuxDataTypeTable(void); MODULE_SCOPE int TclFindCompiledLocal(const char *name, int nameChars, int create, CompileEnv *envPtr); MODULE_SCOPE int TclFixupForwardJump(CompileEnv *envPtr, @@ -1149,7 +1137,6 @@ MODULE_SCOPE int TclFixupForwardJump(CompileEnv *envPtr, int distThreshold); MODULE_SCOPE void TclFreeCompileEnv(CompileEnv *envPtr); MODULE_SCOPE void TclFreeJumpFixupArray(JumpFixupArray *fixupArrayPtr); -MODULE_SCOPE void TclInitAuxDataTypeTable(void); MODULE_SCOPE void TclInitByteCodeObj(Tcl_Obj *objPtr, CompileEnv *envPtr); MODULE_SCOPE void TclInitCompileEnv(Tcl_Interp *interp, |