diff options
| author | Miguel Sofer <miguel.sofer@gmail.com> | 2004-12-10 13:09:07 (GMT) |
|---|---|---|
| committer | Miguel Sofer <miguel.sofer@gmail.com> | 2004-12-10 13:09:07 (GMT) |
| commit | 624c39990f6db4c1318669baef61b8521e063a54 (patch) | |
| tree | 979c2273d05fafbb74a038762775ac289c222445 /generic/tclCompile.h | |
| parent | 38a95a62dcb1fc490f1d0b553eff6a0ddd209bb4 (diff) | |
| download | tcl-624c39990f6db4c1318669baef61b8521e063a54.zip tcl-624c39990f6db4c1318669baef61b8521e063a54.tar.gz tcl-624c39990f6db4c1318669baef61b8521e063a54.tar.bz2 | |
optimised loops that initialise a proc's arguments and compiled local
variables, removing tests from inner loops.
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index c950096..a50409b 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -8,7 +8,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.51 2004/11/03 21:20:30 davygrvy Exp $ + * RCS: @(#) $Id: tclCompile.h,v 1.52 2004/12/10 13:09:14 msofer Exp $ */ #ifndef _TCLCOMPILATION @@ -273,6 +273,14 @@ typedef struct CompileEnv { */ #define TCL_BYTECODE_PRECOMPILED 0x0001 + +/* + * When a bytecode is compiled, interp or namespace resolvers have not been + * applied yet: this is indicated by the TCL_BYTECODE_RESOLVE_VARS flag. + */ + +#define TCL_BYTECODE_RESOLVE_VARS 0x0002 + typedef struct ByteCode { TclHandle interpHandle; /* Handle for interpreter containing the * compiled code. Commands and their compile |