|
 |
3ef2ca |
To: vim_dev@googlegroups.com
|
|
|
3ef2ca |
Subject: Patch 7.4.321
|
|
|
3ef2ca |
Fcc: outbox
|
|
|
3ef2ca |
From: Bram Moolenaar <Bram@moolenaar.net>
|
|
|
3ef2ca |
Mime-Version: 1.0
|
|
|
3ef2ca |
Content-Type: text/plain; charset=UTF-8
|
|
|
3ef2ca |
Content-Transfer-Encoding: 8bit
|
|
|
3ef2ca |
------------
|
|
|
3ef2ca |
|
|
|
3ef2ca |
Patch 7.4.321
|
|
|
3ef2ca |
Problem: Can't build with strawberry perl 5.20 + mingw-w64-4.9.0.
|
|
|
3ef2ca |
Solution: Define save_strlen. (Ken Takata)
|
|
|
3ef2ca |
Files: src/if_perl.xs
|
|
|
3ef2ca |
|
|
|
3ef2ca |
|
|
|
3ef2ca |
*** ../vim-7.4.320/src/if_perl.xs 2014-03-12 17:08:01.508807656 +0100
|
|
|
3ef2ca |
--- src/if_perl.xs 2014-06-12 16:02:25.584044368 +0200
|
|
|
3ef2ca |
***************
|
|
|
3ef2ca |
*** 191,196 ****
|
|
|
3ef2ca |
--- 191,199 ----
|
|
|
3ef2ca |
# define Perl_pop_scope dll_Perl_pop_scope
|
|
|
3ef2ca |
# define Perl_push_scope dll_Perl_push_scope
|
|
|
3ef2ca |
# define Perl_save_int dll_Perl_save_int
|
|
|
3ef2ca |
+ # if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
|
|
|
3ef2ca |
+ # define Perl_save_strlen dll_Perl_save_strlen
|
|
|
3ef2ca |
+ # endif
|
|
|
3ef2ca |
# define Perl_stack_grow dll_Perl_stack_grow
|
|
|
3ef2ca |
# define Perl_set_context dll_Perl_set_context
|
|
|
3ef2ca |
# if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
|
|
|
3ef2ca |
***************
|
|
|
3ef2ca |
*** 311,316 ****
|
|
|
3ef2ca |
--- 314,322 ----
|
|
|
3ef2ca |
static void (*Perl_pop_scope)(pTHX);
|
|
|
3ef2ca |
static void (*Perl_push_scope)(pTHX);
|
|
|
3ef2ca |
static void (*Perl_save_int)(pTHX_ int*);
|
|
|
3ef2ca |
+ #if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
|
|
|
3ef2ca |
+ static void (*Perl_save_strlen)(pTHX_ STRLEN* ptr);
|
|
|
3ef2ca |
+ #endif
|
|
|
3ef2ca |
static SV** (*Perl_stack_grow)(pTHX_ SV**, SV**p, int);
|
|
|
3ef2ca |
static SV** (*Perl_set_context)(void*);
|
|
|
3ef2ca |
#if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
|
|
|
3ef2ca |
***************
|
|
|
3ef2ca |
*** 440,445 ****
|
|
|
3ef2ca |
--- 446,454 ----
|
|
|
3ef2ca |
{"Perl_pop_scope", (PERL_PROC*)&Perl_pop_scope},
|
|
|
3ef2ca |
{"Perl_push_scope", (PERL_PROC*)&Perl_push_scope},
|
|
|
3ef2ca |
{"Perl_save_int", (PERL_PROC*)&Perl_save_int},
|
|
|
3ef2ca |
+ #if (PERL_REVISION == 5) && (PERL_VERSION >= 20)
|
|
|
3ef2ca |
+ {"Perl_save_strlen", (PERL_PROC*)&Perl_save_strlen},
|
|
|
3ef2ca |
+ #endif
|
|
|
3ef2ca |
{"Perl_stack_grow", (PERL_PROC*)&Perl_stack_grow},
|
|
|
3ef2ca |
{"Perl_set_context", (PERL_PROC*)&Perl_set_context},
|
|
|
3ef2ca |
#if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
|
|
|
3ef2ca |
*** ../vim-7.4.320/src/version.c 2014-06-12 14:01:27.583769788 +0200
|
|
|
3ef2ca |
--- src/version.c 2014-06-12 16:02:37.156044806 +0200
|
|
|
3ef2ca |
***************
|
|
|
3ef2ca |
*** 736,737 ****
|
|
|
3ef2ca |
--- 736,739 ----
|
|
|
3ef2ca |
{ /* Add new patch number below this line */
|
|
|
3ef2ca |
+ /**/
|
|
|
3ef2ca |
+ 321,
|
|
|
3ef2ca |
/**/
|
|
|
3ef2ca |
|
|
|
3ef2ca |
--
|
|
|
3ef2ca |
Microsoft's definition of a boolean: TRUE, FALSE, MAYBE
|
|
|
3ef2ca |
"Embrace and extend"...?
|
|
|
3ef2ca |
|
|
|
3ef2ca |
/// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
|
|
|
3ef2ca |
/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
|
|
|
3ef2ca |
\\\ an exciting new programming language -- http://www.Zimbu.org ///
|
|
|
3ef2ca |
\\\ help me help AIDS victims -- http://ICCF-Holland.org ///
|