diff options
author | he <he> | 2001-01-24 18:42:33 +0000 |
---|---|---|
committer | he <he> | 2001-01-24 18:42:33 +0000 |
commit | c9725e735437d3efd54a71e4b1acbc8957cbb6ad (patch) | |
tree | 4da99293cb776d3d2a33bb152af5da7e2f5595d9 /lang/tcl | |
parent | c6c196b2479eb0fa7ec1fa117b27cb111fbf65d9 (diff) | |
download | pkgsrc-c9725e735437d3efd54a71e4b1acbc8957cbb6ad.tar.gz |
Add a point patch pulled from development version of tcl, so that
``while 1 { close [open /dev/null r] }'' does not leak memory for
each go-around. This corresponds to sourceforge bugid #117988.
Bump PKGNAME to tcl-8.3.2nb1.
Diffstat (limited to 'lang/tcl')
-rw-r--r-- | lang/tcl/Makefile | 4 | ||||
-rw-r--r-- | lang/tcl/files/patch-sum | 3 | ||||
-rw-r--r-- | lang/tcl/patches/patch-ad | 19 |
3 files changed, 23 insertions, 3 deletions
diff --git a/lang/tcl/Makefile b/lang/tcl/Makefile index 280ed719de7..aaa81556724 100644 --- a/lang/tcl/Makefile +++ b/lang/tcl/Makefile @@ -1,8 +1,8 @@ -# $NetBSD: Makefile,v 1.4 2000/09/02 15:59:53 wiz Exp $ +# $NetBSD: Makefile,v 1.5 2001/01/24 18:42:33 he Exp $ # DISTNAME= tcl8.3.2 -PKGNAME= tcl-8.3.2 +PKGNAME= tcl-8.3.2nb1 CATEGORIES= lang MASTER_SITES= ftp://ftp.scriptics.com/pub/tcl/tcl8_3/ \ ftp://gd.tuwien.ac.at/languages/tcl/scriptics/tcl8_3/ \ diff --git a/lang/tcl/files/patch-sum b/lang/tcl/files/patch-sum index b5866dc5027..849545ad64b 100644 --- a/lang/tcl/files/patch-sum +++ b/lang/tcl/files/patch-sum @@ -1,5 +1,6 @@ -$NetBSD: patch-sum,v 1.7 2000/12/08 20:41:18 jlam Exp $ +$NetBSD: patch-sum,v 1.8 2001/01/24 18:42:33 he Exp $ MD5 (patch-aa) = be3ae1cef9a45dd28966ae8d67b9ca26 MD5 (patch-ab) = afbb4d55085117146c566c6f4b840793 MD5 (patch-ac) = 6d7acb944f0ffc6111cd9a250b4ecea2 +MD5 (patch-ad) = 6067add3d94e3a1483cdd4cef88939c6 diff --git a/lang/tcl/patches/patch-ad b/lang/tcl/patches/patch-ad new file mode 100644 index 00000000000..0a99a457e4c --- /dev/null +++ b/lang/tcl/patches/patch-ad @@ -0,0 +1,19 @@ +$NetBSD: patch-ad,v 1.1 2001/01/24 18:42:33 he Exp $ + +--- ../generic/tclIO.c.orig Tue Aug 8 02:57:40 2000 ++++ ../generic/tclIO.c Wed Jan 24 16:28:20 2001 +@@ -2181,10 +2181,13 @@ + + /* + * There is only the TOP Channel, so we free the remaining +- * pointers we have and then ourselves. ++ * pointers we have and then ourselves. Since this is the ++ * last of the channels in the stack, make sure to free the ++ * ChannelState structure associated with it. + */ + chanPtr->typePtr = NULL; + ++ Tcl_EventuallyFree((ClientData) statePtr, TCL_DYNAMIC); + Tcl_EventuallyFree((ClientData) chanPtr, TCL_DYNAMIC); + + return errorCode; |