summaryrefslogtreecommitdiff
path: root/lang/perl5.8/files/patch-sv.c
diff options
context:
space:
mode:
authorPhilip M. Gollucci <pgollucci@FreeBSD.org>2012-03-08 18:37:54 +0000
committerPhilip M. Gollucci <pgollucci@FreeBSD.org>2012-03-08 18:37:54 +0000
commit346415e3c06029d36c899250a77aa33df43cf6fc (patch)
tree797965d2bfac58a73c0d67dad809d827f98b87fd /lang/perl5.8/files/patch-sv.c
parent- Include BUILD_DEPENDS as well as RUN_DEPENDS since the module seems to (diff)
- Remove lang/perl5.8 (12/16/2008 EOL) and lang/perl5.10 (08/23/2009 EOL)
- lang/5.12 (default) is in Maint mode and lang/5.14 is GA right now. - The final UNcommitted portition of this PR will move the default perl to lang/perl5.14 but mail/cyrus-impad2 mail/cyrus-impad22 print/perlftlib audio/papcl www/WebMagick misc/gcstar math/ploymak must be fixed or marked BROKEN 1st. PR: ports/165457 Submitted by: pgollucci (myself) Approved by: portmgr (linimon) Exp Run by: linimon Tested by: make index
Notes
Notes: svn path=/head/; revision=292976
Diffstat (limited to 'lang/perl5.8/files/patch-sv.c')
-rw-r--r--lang/perl5.8/files/patch-sv.c21
1 files changed, 0 insertions, 21 deletions
diff --git a/lang/perl5.8/files/patch-sv.c b/lang/perl5.8/files/patch-sv.c
deleted file mode 100644
index 4a4a6d840d26..000000000000
--- a/lang/perl5.8/files/patch-sv.c
+++ /dev/null
@@ -1,21 +0,0 @@
---- sv.c
-+++ sv.c
-@@ -9813,7 +9813,8 @@ Perl_sv_dup(pTHX_ SV *sstr, CLONE_PARAMS* param)
- IoBOTTOM_NAME(dstr) = SAVEPV(IoBOTTOM_NAME(dstr));
- break;
- case SVt_PVAV:
-- if (AvARRAY((AV*)sstr)) {
-+ /* avoid cloning an empty array */
-+ if (AvARRAY((AV*)sstr) && AvFILLp((AV*)sstr) >= 0) {
- SV **dst_ary, **src_ary;
- SSize_t items = AvFILLp((AV*)sstr) + 1;
-
-@@ -9838,6 +9839,8 @@ Perl_sv_dup(pTHX_ SV *sstr, CLONE_PARAMS* param)
- else {
- SvPV_set(dstr, NULL);
- AvALLOC((AV*)dstr) = (SV**)NULL;
-+ AvMAX( (AV *)dstr) = -1;
-+ AvFILLp((AV *)dstr) = -1;
- }
- AvARYLEN((AV*)dstr) = sv_dup_inc(AvARYLEN((AV*)sstr), param);
- break;