diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-03-01 20:13:25 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-03-01 20:13:25 (GMT) |
| commit | 3ae2127973d4f486018c1cd24793f721be4b8be7 (patch) | |
| tree | d050b234f3000762f1ce7fff015d764b79270cff /generic/tclCompile.h | |
| parent | 15628af3662e3b0285e93534a5278e9a98cb7bab (diff) | |
| parent | e2cd8cee919d18399ff14536aa384551fb914e32 (diff) | |
| download | tcl-3ae2127973d4f486018c1cd24793f721be4b8be7.zip tcl-3ae2127973d4f486018c1cd24793f721be4b8be7.tar.gz tcl-3ae2127973d4f486018c1cd24793f721be4b8be7.tar.bz2 | |
merge 8.6
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index f20ecfd..385015a 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -1120,6 +1120,7 @@ MODULE_SCOPE int TclFixupForwardJump(CompileEnv *envPtr, int distThreshold); MODULE_SCOPE void TclFreeCompileEnv(CompileEnv *envPtr); MODULE_SCOPE void TclFreeJumpFixupArray(JumpFixupArray *fixupArrayPtr); +MODULE_SCOPE int TclGetIndexFromToken(Tcl_Token *tokenPtr, int *index); MODULE_SCOPE ByteCode * TclInitByteCode(CompileEnv *envPtr); MODULE_SCOPE ByteCode * TclInitByteCodeObj(Tcl_Obj *objPtr, const Tcl_ObjType *typePtr, CompileEnv *envPtr); @@ -1663,6 +1664,12 @@ MODULE_SCOPE int TclPushProcCallFrame(ClientData clientData, #define TCL_NO_ELEMENT 2 /* Do not push the array element. */ /* + * Special value used by TclGetIndexFromToken to encoding the "end" index. + */ + +#define TCL_INDEX_END (-2) + +/* * DTrace probe macros (NOPs if DTrace support is not enabled). */ |