diff options
| author | mig <mig> | 2011-03-24 23:42:09 (GMT) |
|---|---|---|
| committer | mig <mig> | 2011-03-24 23:42:09 (GMT) |
| commit | c0c2b033c6b2945b52caee32e078d6f45f46f0cc (patch) | |
| tree | 36f4b876cbd476d3ea457022f410f4154aaffb04 /generic/tclVar.c | |
| parent | 884ba1c7869af6d659c880a2dc8a9d7a76f034bd (diff) | |
| download | tcl-c0c2b033c6b2945b52caee32e078d6f45f46f0cc.zip tcl-c0c2b033c6b2945b52caee32e078d6f45f46f0cc.tar.gz tcl-c0c2b033c6b2945b52caee32e078d6f45f46f0cc.tar.bz2 | |
branch with tip #280 removed, for perf impact measurements
Diffstat (limited to 'generic/tclVar.c')
| -rw-r--r-- | generic/tclVar.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tclVar.c b/generic/tclVar.c index a4b8a69..7cd07a7 100644 --- a/generic/tclVar.c +++ b/generic/tclVar.c @@ -1930,9 +1930,6 @@ TclPtrSetVar( } else { if (Tcl_IsShared(oldValuePtr)) { /* Append to copy. */ varPtr->value.objPtr = Tcl_DuplicateObj(oldValuePtr); - - TclContinuationsCopy(varPtr->value.objPtr, oldValuePtr); - TclDecrRefCount(oldValuePtr); oldValuePtr = varPtr->value.objPtr; Tcl_IncrRefCount(oldValuePtr); /* Since var is ref */ |