Commits

Ken Takata committed bbdc083

update for 7.4.321

Remove a merged patch: support-perl-5.20.patch

Comments (0)

Files changed (2)

 Make_mvc.mak.patch
 add-stat-test.patch
 gvim-nsi.patch
-support-perl-5.20.patch
 fix-config_cache-removal.patch #+rejected

support-perl-5.20.patch

-# HG changeset patch
-# Parent 5526ea675a3318fa072ad0aa13c6a5eae5748f90
-diff --git a/src/if_perl.xs b/src/if_perl.xs
---- a/src/if_perl.xs
-+++ b/src/if_perl.xs
-@@ -191,6 +191,9 @@
- # define Perl_pop_scope dll_Perl_pop_scope
- # define Perl_push_scope dll_Perl_push_scope
- # define Perl_save_int dll_Perl_save_int
-+# if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
-+#  define Perl_save_strlen dll_Perl_save_strlen
-+# endif
- # define Perl_stack_grow dll_Perl_stack_grow
- # define Perl_set_context dll_Perl_set_context
- # if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
-@@ -311,6 +314,9 @@
- static void (*Perl_pop_scope)(pTHX);
- static void (*Perl_push_scope)(pTHX);
- static void (*Perl_save_int)(pTHX_ int*);
-+#if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
-+static void (*Perl_save_strlen)(pTHX_ STRLEN* ptr);
-+#endif
- static SV** (*Perl_stack_grow)(pTHX_ SV**, SV**p, int);
- static SV** (*Perl_set_context)(void*);
- #if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
-@@ -440,6 +446,9 @@
-     {"Perl_pop_scope", (PERL_PROC*)&Perl_pop_scope},
-     {"Perl_push_scope", (PERL_PROC*)&Perl_push_scope},
-     {"Perl_save_int", (PERL_PROC*)&Perl_save_int},
-+#if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
-+    {"Perl_save_strlen", (PERL_PROC*)&Perl_save_strlen},
-+#endif
-     {"Perl_stack_grow", (PERL_PROC*)&Perl_stack_grow},
-     {"Perl_set_context", (PERL_PROC*)&Perl_set_context},
- #if (PERL_REVISION == 5) && (PERL_VERSION >= 14)