svn commit: r383995 - head/devel/p5-B-C/files

[Mathieu Arnold]

Author: mat
Date: Tue Apr 14 12:02:25 2015
New Revision: 383995
URL: https://svnweb.freebsd.org/changeset/ports/383995

Log:
  Fix build with Perl 5.21.6+
  
  Obtained from:	https://code.google.com/p/perl-compiler/source/detail?r=86223007f5b2e947c81ee2ccbc350d49c000d3c8
  Sponsored by:	Absolight

Added:
  head/devel/p5-B-C/files/
  head/devel/p5-B-C/files/patch-ByteLoader_bytecode.h   (contents, props changed)

Added: head/devel/p5-B-C/files/patch-ByteLoader_bytecode.h
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ head/devel/p5-B-C/files/patch-ByteLoader_bytecode.h	Tue Apr 14 12:02:25 2015	(r383995)
@@ -0,0 +1,25 @@
+--- ByteLoader/bytecode.h.orig	2014-08-21 22:13:08 UTC
++++ ByteLoader/bytecode.h
+@@ -785,13 +785,21 @@ static int bget_swab = 0;
+ 	    padl = (SV*)pad_new(arg);			\
+ 	    BSET_OBJ_STOREX(padl);			\
+ 	} STMT_END
+-#if (PERL_VERSION >= 19) || ( PERL_VERSION == 19 && PERL_SUBVERSION > 3)
++/* PADNAMELIST now a valid lvalue: v5.21.6-197-g0f94cb1 */
++#if (PERL_VERSION >= 22) || ( PERL_VERSION == 21 && PERL_SUBVERSION > 5)
++#define BSET_padl_name(padl, pad)                \
++    PadlistARRAY((PADLIST*)padl)[0] = (PAD*)pad; \
++    PadnamelistMAXNAMED((PADNAMELIST*)pad) = AvFILL((AV*)pad)
++#else
++/* extra PADNAMELIST: v5.17.3-49-g36c300b */
++#if (PERL_VERSION >= 18) || ( PERL_VERSION == 17 && PERL_SUBVERSION > 3)
+ #define BSET_padl_name(padl, pad)                \
+     PadlistARRAY((PADLIST*)padl)[0] = (PAD*)pad; \
+     PadnamelistMAXNAMED((PAD*)pad) = AvFILL((AV*)pad)
+ #else
+ #define BSET_padl_name(padl, pad)  PadlistARRAY((PADLIST*)padl)[0] = (PAD*)pad
+ #endif
++#endif
+ #define BSET_padl_sym(padl, pad)   PadlistARRAY((PADLIST*)padl)[1] = (PAD*)pad
+ #define BSET_xcv_name_hek(cv, arg)                                      \
+   STMT_START {                                                          \