[Pkg-tcltk-commits] r402 - in tcl8.5/trunk/debian: . patches

[sgolovan-guest at alioth.debian.org]

Author: sgolovan-guest
Date: 2007-11-28 08:45:48 +0000 (Wed, 28 Nov 2007)
New Revision: 402

Removed:
   tcl8.5/trunk/debian/patches/stack2.diff
Modified:
   tcl8.5/trunk/debian/changelog
   tcl8.5/trunk/debian/patches/series
Log:
[tcl8.5]
  * Removed unneeded patch.


Modified: tcl8.5/trunk/debian/changelog
===================================================================
--- tcl8.5/trunk/debian/changelog	2007-11-28 08:44:26 UTC (rev 401)
+++ tcl8.5/trunk/debian/changelog	2007-11-28 08:45:48 UTC (rev 402)
@@ -1,3 +1,10 @@
+tcl8.5 (0.b3-4) UNRELEASED; urgency=low
+
+  * NOT RELEASED YET
+  * Removed unneeded patch.
+
+ -- Sergei Golovan <sgolovan at debian.org>  Wed, 28 Nov 2007 11:44:17 +0300
+
 tcl8.5 (0.b3-3) unstable; urgency=low
 
   * Temporarily disabled stack checking on hppa architecture since it

Modified: tcl8.5/trunk/debian/patches/series
===================================================================
--- tcl8.5/trunk/debian/patches/series	2007-11-28 08:44:26 UTC (rev 401)
+++ tcl8.5/trunk/debian/patches/series	2007-11-28 08:45:48 UTC (rev 402)
@@ -1,5 +1,4 @@
 stack.diff
-stack2.diff
 tcllibrary.diff
 tclpackagepath.diff
 tclprivate.diff

Deleted: tcl8.5/trunk/debian/patches/stack2.diff
===================================================================
--- tcl8.5/trunk/debian/patches/stack2.diff	2007-11-28 08:44:26 UTC (rev 401)
+++ tcl8.5/trunk/debian/patches/stack2.diff	2007-11-28 08:45:48 UTC (rev 402)
@@ -1,38 +0,0 @@
-Index: tcl/generic/tclBasic.c
-===================================================================
-RCS file: /cvsroot/tcl/tcl/generic/tclBasic.c,v
-retrieving revision 1.285
-diff -u -r1.285 tclBasic.c
---- tcl/generic/tclBasic.c	26 Nov 2007 19:11:11 -0000	1.285
-+++ tcl/generic/tclBasic.c	27 Nov 2007 15:38:10 -0000
-@@ -351,7 +351,7 @@
-     TclpGetCStackParams(&((iPtr)->stackBound))
- #ifdef TCL_STACK_GROWS_UP
- #define CheckCStack(iPtr, localIntPtr) \
--	   (!(iPtr)->stackBound || (localIntPtr) < (iPtr)->stackBound)
-+	   ((localIntPtr) < (iPtr)->stackBound)
- #else /* TCL_STACK_GROWS_UP */
- #define CheckCStack(iPtr, localIntPtr) \
- 	   ((localIntPtr) > (iPtr)->stackBound)
-Index: tcl/unix/tclUnixInit.c
-===================================================================
-RCS file: /cvsroot/tcl/tcl/unix/tclUnixInit.c,v
-retrieving revision 1.81
-diff -u -r1.81 tclUnixInit.c
---- tcl/unix/tclUnixInit.c	26 Nov 2007 19:11:13 -0000	1.81
-+++ tcl/unix/tclUnixInit.c	27 Nov 2007 15:38:10 -0000
-@@ -1059,10 +1059,14 @@
- 	result = GetStackSize(&stackSize);
- 	if (result != TCL_OK) {
- 	    /* Can't check, assume it always succeeds */
-+#ifdef TCLSTACK_GROWS_UP
-+	    tsdPtr->stackBound = (int *)-1;
-+#else
- #ifdef TCL_CROSS_COMPILE
- 	    stackGrowsDown = 1;
- #endif
- 	    tsdPtr->stackBound = NULL;
-+#endif
- 	    goto done;
- 	}
-     }