diff options
author | dgp <dgp@users.sourceforge.net> | 2011-04-27 18:49:22 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-04-27 18:49:22 (GMT) |
commit | c3cda5c6bc7d11ffa51a2c692f4cb1cd4c144fd9 (patch) | |
tree | 74d850ee7ceb6a830457fcb77bac7e42de776ec5 /generic/tclExecute.c | |
parent | a6144b281760c99bdb8ae93a37a0195a067df7b7 (diff) | |
download | tcl-c3cda5c6bc7d11ffa51a2c692f4cb1cd4c144fd9.zip tcl-c3cda5c6bc7d11ffa51a2c692f4cb1cd4c144fd9.tar.gz tcl-c3cda5c6bc7d11ffa51a2c692f4cb1cd4c144fd9.tar.bz2 |
TclFreeIntRep() cleanup.
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r-- | generic/tclExecute.c | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index ab50256..4fe65d7 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -2549,7 +2549,6 @@ TEBCresume( #if !TCL_COMPILE_DEBUG if (bytes != tclEmptyStringRep && !Tcl_IsShared(objResultPtr)) { TclFreeIntRep(objResultPtr); - objResultPtr->typePtr = NULL; objResultPtr->bytes = ckrealloc(bytes, length+appendLen+1); objResultPtr->length = length + appendLen; p = TclGetString(objResultPtr) + length; |