summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorrillig <rillig>2008-10-21 22:46:49 +0000
committerrillig <rillig>2008-10-21 22:46:49 +0000
commita878ffc2a846d9f8d19eb61fecad59b640cb124c (patch)
treec5284540add86e0e39fe58cf4e153ccbe9009d33
parentb8b20e61ba08da69331ce3cc631d06aae98db12b (diff)
downloadpkgsrc-a878ffc2a846d9f8d19eb61fecad59b640cb124c.tar.gz
Fixed a memory leak in the qr operator. PKGREVISION++
-rw-r--r--lang/perl5/Makefile4
-rw-r--r--lang/perl5/distinfo3
-rw-r--r--lang/perl5/patches/patch-ri14
3 files changed, 18 insertions, 3 deletions
diff --git a/lang/perl5/Makefile b/lang/perl5/Makefile
index 8034f03b13f..9261aa2170b 100644
--- a/lang/perl5/Makefile
+++ b/lang/perl5/Makefile
@@ -1,8 +1,8 @@
-# $NetBSD: Makefile,v 1.141 2008/10/19 19:04:57 he Exp $
+# $NetBSD: Makefile,v 1.142 2008/10/21 22:46:49 rillig Exp $
DISTNAME= perl-5.10.0
CATEGORIES= lang devel perl5
-PKGREVISION= 1
+PKGREVISION= 2
MASTER_SITES= ${MASTER_SITE_PERL_CPAN:S,/modules/by-module/$,/src/,}
DISTFILES+= ${DISTNAME}${EXTRACT_SUFX}
diff --git a/lang/perl5/distinfo b/lang/perl5/distinfo
index 3c49174fc76..a11cb3cecb6 100644
--- a/lang/perl5/distinfo
+++ b/lang/perl5/distinfo
@@ -1,4 +1,4 @@
-$NetBSD: distinfo,v 1.51 2008/10/11 19:36:11 tron Exp $
+$NetBSD: distinfo,v 1.52 2008/10/21 22:46:49 rillig Exp $
SHA1 (perl-5.10.0.tar.gz) = adf73606dd5248af7ccdd735bcaa0e628ea75b3c
RMD160 (perl-5.10.0.tar.gz) = c6614fc99a162790a703f91085b24a60af903ba2
@@ -15,6 +15,7 @@ SHA1 (patch-ci) = 70531d44b6e2cb7a7ab9fb20ffe91d97e5c03e3a
SHA1 (patch-ck) = 28207b8186c9ad194a1edc696159915bc16d1097
SHA1 (patch-cn) = 7ca2b1ff19f8371637a34ec26779b37d74c74cca
SHA1 (patch-co) = 493ae6cb6cb544ce023c2a1fb067abe943bba2d4
+SHA1 (patch-ri) = fc838ec10cf601a580aa1f58eb93c3198a13ff71
SHA1 (patch-ta) = 60d9ef72db56b9f149f3995b3f526fc32a352bd7
SHA1 (patch-zc) = a23002397ffaebb243f7683c95c8fb227af90f49
SHA1 (patch-zd) = ee67148b8f44fb3826273574abb62ad9ca4ffa7f
diff --git a/lang/perl5/patches/patch-ri b/lang/perl5/patches/patch-ri
new file mode 100644
index 00000000000..675b07b78e2
--- /dev/null
+++ b/lang/perl5/patches/patch-ri
@@ -0,0 +1,14 @@
+$NetBSD: patch-ri,v 1.1 2008/10/21 22:46:49 rillig Exp $
+
+http://rt.perl.org/rt3/Public/Bug/Display.html?id=59516
+
+--- pp_hot.c.orig 2008-10-21 23:34:17.000000000 +0200
++++ pp_hot.c 2008-10-21 23:34:33.000000000 +0200
+@@ -1195,6 +1195,7 @@ PP(pp_qr)
+ SV * const pkg = CALLREG_PACKAGE(rx);
+ SV * const rv = sv_newmortal();
+ SV * const sv = newSVrv(rv, SvPV_nolen(pkg));
++ SvREFCNT_dec(pkg);
+ if (rx->extflags & RXf_TAINTED)
+ SvTAINTED_on(rv);
+ sv_magic(sv,(SV*)ReREFCNT_inc(rx), PERL_MAGIC_qr,0,0);