Subject: 3610404 When we let go of commandPtr in TclEvalObjvInternal, NULL out the variable so we don't mistakenly try to use the value later after we freed it.

From: dgp <[email-masked]>
Date: Tue, 16 Apr 2013 20:18:19 +0000

---
 generic/tclBasic.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index cfb5c43..d3b5490 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -3652,6 +3652,7 @@ TclEvalObjvInternal(
 	    checkTraces = 0;
 	    if (commandPtr) {
 		Tcl_DecrRefCount(commandPtr);
+		commandPtr = NULL;
 	    }
 	    goto reparseBecauseOfTraces;
 	}
-- 
cgit v0.12