diff options
| author | welch <welch> | 1998-07-06 14:54:30 (GMT) |
|---|---|---|
| committer | welch <welch> | 1998-07-06 14:54:30 (GMT) |
| commit | 99b5d44e0551941d42119fadc9d92fb7bcf00a74 (patch) | |
| tree | fe16b101d7013592731bdda5b115f1d71a242606 /generic/tclCompile.h | |
| parent | 58bde7078822cb879806acb1a72d5c6a7cf3685c (diff) | |
| download | tcl-99b5d44e0551941d42119fadc9d92fb7bcf00a74.zip tcl-99b5d44e0551941d42119fadc9d92fb7bcf00a74.tar.gz tcl-99b5d44e0551941d42119fadc9d92fb7bcf00a74.tar.bz2 | |
Merged changes between child workspace "/home/welch/ws/tcl8.0.3i" and
parent workspace "/home/welch/ws/tcl8.0.3".
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 67435a3..62581f2 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -6,7 +6,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: %Z% $Id: tclCompile.h,v 1.3 1998/07/01 17:57:17 escoffon Exp $ + * SCCS: %Z% $Id: tclCompile.h,v 1.4 1998/07/06 14:54:36 welch Exp $ */ #ifndef _TCLCOMPILATION @@ -339,6 +339,14 @@ typedef struct ByteCode { * ByteCode was compiled. Used to invalidate * code when, e.g., commands with compile * procs are redefined. */ + Namespace *nsPtr; /* Namespace context in which this code + * was compiled. If the code is executed + * if a different namespace, it must be + * recompiled. */ + int nsEpoch; /* Value of nsPtr->resolverEpoch when this + * ByteCode was compiled. Used to invalidate + * code when new namespace resolution rules + * are put into effect. */ int refCount; /* Reference count: set 1 when created * plus 1 for each execution of the code * currently active. This structure can be |