diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2010-09-27 20:33:37 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2010-09-27 20:33:37 (GMT) |
| commit | e7e975cd6f4d6d27ec49946ba6b5d6aeb0d75689 (patch) | |
| tree | 7230190020b96b7377c7a1e8d4bc809e6c6ccd15 /generic/tclCompile.h | |
| parent | b5bc78c17be16102c70991d3090dc85aa9baf44b (diff) | |
| download | tcl-e7e975cd6f4d6d27ec49946ba6b5d6aeb0d75689.zip tcl-e7e975cd6f4d6d27ec49946ba6b5d6aeb0d75689.tar.gz tcl-e7e975cd6f4d6d27ec49946ba6b5d6aeb0d75689.tar.bz2 | |
Merged from HEAD.
Also replaced a funky NRCallTEBC with the new call TclNRExecuteByteCode.
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 686f508..e8a40d7 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompile.h,v 1.126 2010/08/18 15:44:12 msofer Exp $ + * RCS: @(#) $Id: tclCompile.h,v 1.126.2.1 2010/09/27 20:33:37 kennykb Exp $ */ #ifndef _TCLCOMPILATION @@ -863,14 +863,9 @@ typedef struct { *---------------------------------------------------------------- */ -MODULE_SCOPE Tcl_NRPostProc NRCallTEBC; MODULE_SCOPE Tcl_NRPostProc NRCommand; MODULE_SCOPE Tcl_ObjCmdProc NRInterpCoroutine; -#define TCL_NR_BC_TYPE 0 -#define TCL_NR_ATEXIT_TYPE 1 -#define TCL_NR_YIELD_TYPE 2 - /* *---------------------------------------------------------------- * Procedures exported by the engine to be used by tclBasic.c @@ -923,7 +918,7 @@ MODULE_SCOPE void TclEmitForwardJump(CompileEnv *envPtr, MODULE_SCOPE ExceptionRange * TclGetExceptionRangeForPc(unsigned char *pc, int catchOnly, ByteCode *codePtr); MODULE_SCOPE void TclExpandJumpFixupArray(JumpFixupArray *fixupArrayPtr); -MODULE_SCOPE int TclExecuteByteCode(Tcl_Interp *interp, +MODULE_SCOPE int TclNRExecuteByteCode(Tcl_Interp *interp, ByteCode *codePtr); MODULE_SCOPE void TclFinalizeAuxDataTypeTable(void); MODULE_SCOPE int TclFindCompiledLocal(const char *name, int nameChars, |