diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-31 09:42:20 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-31 09:42:20 (GMT) |
| commit | 31f3f5ff6333217316c5da442a0194085211dfe1 (patch) | |
| tree | 2be8d4d05d8f21d613366b08b11fd4acff5fde4b /generic/tclCompExpr.c | |
| parent | f385174158496b543825ede31d40b25de7196e51 (diff) | |
| download | tcl-31f3f5ff6333217316c5da442a0194085211dfe1.zip tcl-31f3f5ff6333217316c5da442a0194085211dfe1.tar.gz tcl-31f3f5ff6333217316c5da442a0194085211dfe1.tar.bz2 | |
Use twoPtrValue.ptr1 in stead of otherValuePtr everywhere. This is exactly the same field, but it allows twoPtrValue.ptr2 to be used for other purposes.
Diffstat (limited to 'generic/tclCompExpr.c')
| -rw-r--r-- | generic/tclCompExpr.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 999fe0a..9142e2b 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -2111,7 +2111,7 @@ ExecConstantExprTree( TclInitByteCodeObj(byteCodeObj, envPtr); TclFreeCompileEnv(envPtr); TclStackFree(interp, envPtr); - byteCodePtr = (ByteCode *) byteCodeObj->internalRep.otherValuePtr; + byteCodePtr = (ByteCode *) byteCodeObj->internalRep.twoPtrValue.ptr1; code = TclExecuteByteCode(interp, byteCodePtr); Tcl_DecrRefCount(byteCodeObj); return code; |