summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2015-08-17 18:01:16 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2015-08-17 18:01:16 (GMT)
commit84bff4d332a394a0f08947e05e535ff4b1b2476c (patch)
tree23a20bece7336294b8577403bafdc8fbf8a3adca /generic/tclExecute.c
parentad86ffae8c9504f573b41cb5a09d74da963ccfba (diff)
downloadtcl-84bff4d332a394a0f08947e05e535ff4b1b2476c.zip
tcl-84bff4d332a394a0f08947e05e535ff4b1b2476c.tar.gz
tcl-84bff4d332a394a0f08947e05e535ff4b1b2476c.tar.bz2
Proposed fix for invalid write, found by valgrind.bug_7a87a9bc5b
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 8ada6d2..7f65262 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -4186,7 +4186,6 @@ TEBCresume(
} else if (flags & TCL_LEAVE_ERR_MSG) {
goto slowUnsetArray;
}
- varPtr->value.objPtr = NULL;
TRACE_APPEND(("OK\n"));
NEXT_INST_F(6, 1, 0);
} else if (!varPtr && !(flags & TCL_LEAVE_ERR_MSG)) {