Subject: fix the new assertion, it should not trigger when an expansion is in progress

From: mig <mig>
Date: Sat, 5 Jan 2013 00:36:25 +0000

---
 generic/tclExecute.c | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 496bd9b..fbf8f6d 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -251,12 +251,15 @@ VarHashCreateVar(
  *	otherwise, push objResultPtr. If (result < 0), objResultPtr already
  *	has the correct reference count.
  *
- * We use the new compile-time assertions to cheack that nCleanup is constant
+ * We use the new compile-time assertions to check that nCleanup is constant
  * and within range.
  */
 
+/* Verify the stack depth, only when no expansion is in progress */
+
 #if TCL_COMPILE_DEBUG
-#define CHECK_STACK() assert(CURR_DEPTH <= codePtr->maxStackDepth)
+#define CHECK_STACK()							\
+    assert((auxObjList != NULL) || (CURR_DEPTH <= codePtr->maxStackDepth))
 #else
 #define CHECK_STACK()
 #endif
-- 
cgit v0.12