SOURCES: tcl-bug-1618411.patch (NEW), tcl-bug-1618411-workaround.p...

[arekm]

Author: arekm                        Date: Fri Feb  9 07:20:18 2007 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- proper fix instead of workaround

---- Files affected:
SOURCES:
   tcl-bug-1618411.patch (NONE -> 1.1)  (NEW), tcl-bug-1618411-workaround.patch (1.1 -> NONE)  (REMOVED)

---- Diffs:

================================================================
Index: SOURCES/tcl-bug-1618411.patch
diff -u /dev/null SOURCES/tcl-bug-1618411.patch:1.1
--- /dev/null	Fri Feb  9 08:20:18 2007
+++ SOURCES/tcl-bug-1618411.patch	Fri Feb  9 08:20:13 2007
@@ -0,0 +1,20 @@
+--- tcl/unix/tclUnixInit.c	2006/09/10 17:04:07	1.67
++++ tcl/unix/tclUnixInit.c	2007/02/08 23:11:21	1.68
+@@ -1030,7 +1030,7 @@
+ 				/* Most variables are actually in a
+ 				 * thread-specific data block to minimise the
+ 				 * impact on the stack. */
+-    register ptrdiff_t stackUsed;
++    register size_t stackUsed;
+     int localVar;		/* Reference to somewhere on the local stack.
+ 				 * This is declared last so it's as "deep" as
+ 				 * possible. */
+@@ -1089,7 +1089,7 @@
+      * Now we perform the actual check. Are we about to blow our stack frame?
+      */
+ 
+-    if (stackUsed < (ptrdiff_t) tsdPtr->stackSize) {
++    if (stackUsed < tsdPtr->stackSize) {
+ 	STACK_DEBUG(("stack OK\tin:%p\tout:%p\tuse:%04X\tmax:%04X\n",
+ 		&localVar, tsdPtr->outerVarPtr, stackUsed, tsdPtr->stackSize));
+ 	return 1;
================================================================