svn commit: r383784 - in head/lang: perl5.16 perl5.16/files perl5.18 perl5.18/files perl5.20 perl5.20/files
Mathieu Arnold
mat at FreeBSD.org
Sat Apr 11 10:31:47 UTC 2015
Author: mat
Date: Sat Apr 11 10:31:43 2015
New Revision: 383784
URL: https://svnweb.freebsd.org/changeset/ports/383784
Log:
Patch Perl's header for c++11 compatibility.
While there, drop MASTER_SITE_SUBDIRS.
PR: 199361
Submitted by: amdmi3
Sponsored by: Absolight
Added:
head/lang/perl5.16/files/patch-pad.h (contents, props changed)
head/lang/perl5.18/files/patch-pad.h (contents, props changed)
head/lang/perl5.18/files/patch-perl.h (contents, props changed)
head/lang/perl5.20/files/patch-vutil.h (contents, props changed)
Modified:
head/lang/perl5.16/Makefile
head/lang/perl5.18/Makefile
head/lang/perl5.20/Makefile
Modified: head/lang/perl5.16/Makefile
==============================================================================
--- head/lang/perl5.16/Makefile Sat Apr 11 09:27:16 2015 (r383783)
+++ head/lang/perl5.16/Makefile Sat Apr 11 10:31:43 2015 (r383784)
@@ -3,10 +3,9 @@
PORTNAME= perl
PORTVERSION= ${PERL_VERSION}
-PORTREVISION= 19
+PORTREVISION= 20
CATEGORIES= lang devel perl5
-MASTER_SITES= CPAN
-MASTER_SITE_SUBDIR= ../../src
+MASTER_SITES= CPAN/../../src
DIST_SUBDIR= perl
MAINTAINER= perl at FreeBSD.org
Added: head/lang/perl5.16/files/patch-pad.h
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ head/lang/perl5.16/files/patch-pad.h Sat Apr 11 10:31:43 2015 (r383784)
@@ -0,0 +1,46 @@
+--- pad.h.orig 2013-03-04 15:16:22 UTC
++++ pad.h
+@@ -140,14 +140,14 @@ typedef enum {
+ # define ASSERT_CURPAD_LEGAL(label) \
+ pad_peg(label); \
+ if (PL_comppad ? (AvARRAY(PL_comppad) != PL_curpad) : (PL_curpad != 0)) \
+- Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
++ Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
+ label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
+
+
+ # define ASSERT_CURPAD_ACTIVE(label) \
+ pad_peg(label); \
+ if (!PL_comppad || (AvARRAY(PL_comppad) != PL_curpad)) \
+- Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
++ Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
+ label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
+ #else
+ # define ASSERT_CURPAD_LEGAL(label)
+@@ -233,7 +233,7 @@ Restore the old pad saved into the local
+ PL_comppad = (PAD*) (AvARRAY(padlist)[nth]); \
+ PL_curpad = AvARRAY(PL_comppad); \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] set_cur depth=%d\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] set_cur depth=%d\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad), (int)(nth)));
+
+
+@@ -251,7 +251,7 @@ Restore the old pad saved into the local
+ PL_comppad = (npad); \
+ PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] save_local\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] save_local\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
+
+ #define PAD_RESTORE_LOCAL(opad) \
+@@ -259,7 +259,7 @@ Restore the old pad saved into the local
+ PL_comppad = opad; \
+ PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] restore_local\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] restore_local\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
+
+
Modified: head/lang/perl5.18/Makefile
==============================================================================
--- head/lang/perl5.18/Makefile Sat Apr 11 09:27:16 2015 (r383783)
+++ head/lang/perl5.18/Makefile Sat Apr 11 10:31:43 2015 (r383784)
@@ -3,10 +3,9 @@
PORTNAME= perl
PORTVERSION= ${PERL_VERSION}
-PORTREVISION= 12
+PORTREVISION= 13
CATEGORIES= lang devel perl5
-MASTER_SITES= CPAN
-MASTER_SITE_SUBDIR= ../../src
+MASTER_SITES= CPAN/../../src
DIST_SUBDIR= perl
MAINTAINER= perl at FreeBSD.org
Added: head/lang/perl5.18/files/patch-pad.h
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ head/lang/perl5.18/files/patch-pad.h Sat Apr 11 10:31:43 2015 (r383784)
@@ -0,0 +1,46 @@
+--- pad.h.orig 2014-10-01 01:33:00 UTC
++++ pad.h
+@@ -143,14 +143,14 @@ typedef enum {
+ # define ASSERT_CURPAD_LEGAL(label) \
+ pad_peg(label); \
+ if (PL_comppad ? (AvARRAY(PL_comppad) != PL_curpad) : (PL_curpad != 0)) \
+- Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
++ Perl_croak(aTHX_ "panic: illegal pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
+ label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
+
+
+ # define ASSERT_CURPAD_ACTIVE(label) \
+ pad_peg(label); \
+ if (!PL_comppad || (AvARRAY(PL_comppad) != PL_curpad)) \
+- Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%"UVxf"[0x%"UVxf"]",\
++ Perl_croak(aTHX_ "panic: invalid pad in %s: 0x%" UVxf "[0x%" UVxf "]",\
+ label, PTR2UV(PL_comppad), PTR2UV(PL_curpad));
+ #else
+ # define ASSERT_CURPAD_LEGAL(label)
+@@ -320,7 +320,7 @@ Restore the old pad saved into the local
+ PL_comppad = (PAD*) (PadlistARRAY(padlist)[nth]); \
+ PL_curpad = AvARRAY(PL_comppad); \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] set_cur depth=%d\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] set_cur depth=%d\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad), (int)(nth)));
+
+
+@@ -338,7 +338,7 @@ Restore the old pad saved into the local
+ PL_comppad = (npad); \
+ PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] save_local\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] save_local\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
+
+ #define PAD_RESTORE_LOCAL(opad) \
+@@ -346,7 +346,7 @@ Restore the old pad saved into the local
+ PL_comppad = opad; \
+ PL_curpad = PL_comppad ? AvARRAY(PL_comppad) : NULL; \
+ DEBUG_Xv(PerlIO_printf(Perl_debug_log, \
+- "Pad 0x%"UVxf"[0x%"UVxf"] restore_local\n", \
++ "Pad 0x%" UVxf "[0x%" UVxf "] restore_local\n", \
+ PTR2UV(PL_comppad), PTR2UV(PL_curpad)));
+
+
Added: head/lang/perl5.18/files/patch-perl.h
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ head/lang/perl5.18/files/patch-perl.h Sat Apr 11 10:31:43 2015 (r383784)
@@ -0,0 +1,20 @@
+--- perl.h.orig 2014-10-01 01:33:00 UTC
++++ perl.h
+@@ -4254,7 +4254,7 @@ START_EXTERN_C
+ EXTCONST char PL_warn_uninit[]
+ INIT("Use of uninitialized value%s%s%s");
+ EXTCONST char PL_warn_uninit_sv[]
+- INIT("Use of uninitialized value%"SVf"%s%s");
++ INIT("Use of uninitialized value%" SVf "%s%s");
+ EXTCONST char PL_warn_nosemi[]
+ INIT("Semicolon seems to be missing");
+ EXTCONST char PL_warn_reserved[]
+@@ -4274,7 +4274,7 @@ EXTCONST char PL_no_usym[]
+ EXTCONST char PL_no_aelem[]
+ INIT("Modification of non-creatable array value attempted, subscript %d");
+ EXTCONST char PL_no_helem_sv[]
+- INIT("Modification of non-creatable hash value attempted, subscript \"%"SVf"\"");
++ INIT("Modification of non-creatable hash value attempted, subscript \"%" SVf "\"");
+ EXTCONST char PL_no_modify[]
+ INIT("Modification of a read-only value attempted");
+ EXTCONST char PL_no_mem[sizeof("Out of memory!\n")]
Modified: head/lang/perl5.20/Makefile
==============================================================================
--- head/lang/perl5.20/Makefile Sat Apr 11 09:27:16 2015 (r383783)
+++ head/lang/perl5.20/Makefile Sat Apr 11 10:31:43 2015 (r383784)
@@ -3,10 +3,9 @@
PORTNAME= perl
PORTVERSION= ${PERL_VERSION}
-PORTREVISION= 1
+PORTREVISION= 2
CATEGORIES= lang devel perl5
-MASTER_SITES= CPAN
-MASTER_SITE_SUBDIR= ../../src
+MASTER_SITES= CPAN/../../src
DIST_SUBDIR= perl
MAINTAINER= perl at FreeBSD.org
Added: head/lang/perl5.20/files/patch-vutil.h
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ head/lang/perl5.20/files/patch-vutil.h Sat Apr 11 10:31:43 2015 (r383784)
@@ -0,0 +1,11 @@
+--- vutil.h.orig 2014-12-27 11:49:03 UTC
++++ vutil.h
+@@ -115,7 +115,7 @@ S_croak_xs_usage(pTHX_ const CV *const c
+ Perl_croak_nocontext("Usage: %s(%s)", gvname, params);
+ } else {
+ /* Pants. I don't think that it should be possible to get here. */
+- Perl_croak_nocontext("Usage: CODE(0x%"UVxf")(%s)", PTR2UV(cv), params);
++ Perl_croak_nocontext("Usage: CODE(0x%" UVxf ")(%s)", PTR2UV(cv), params);
+ }
+ }
+
More information about the svn-ports-head
mailing list