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 | 914d6e15467f0f0635f410f5915644ac40de618e (patch) | |
| tree | d050b234f3000762f1ce7fff015d764b79270cff /generic/tclCompile.h | |
| parent | e9c0312caf99f93393a446302d67b7bcafeca575 (diff) | |
| parent | 683dada2173aaa8eb39f76d13d7e9505e77ec5b7 (diff) | |
| download | tcl-914d6e15467f0f0635f410f5915644ac40de618e.zip tcl-914d6e15467f0f0635f410f5915644ac40de618e.tar.gz tcl-914d6e15467f0f0635f410f5915644ac40de618e.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). */ |