aniani/vim
0
0
Fork 1
mirror of https://github.com/vim/vim.git synced 2025-09-23 03:43:49 -04:00
Code Activity

updated for version 7.4.321

Browse Source 
Problem:    Can't build with strawberry perl 5.20 + mingw-w64-4.9.0.
Solution:   Define save_strlen. (Ken Takata)
This commit is contained in:
Bram Moolenaar
2014-06-12 16:03:28 +02:00
parent 3be8585661
commit 0e6c5ef7ef
2 changed files with 11 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/if_perl.xs
View File

@@ -191,6 +191,9 @@ typedef int perl_key;
# define Perl_pop_scope dll_Perl_pop_scope # define Perl_pop_scope dll_Perl_pop_scope
# define Perl_push_scope dll_Perl_push_scope # define Perl_push_scope dll_Perl_push_scope
# define Perl_save_int dll_Perl_save_int # 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_stack_grow dll_Perl_stack_grow
# define Perl_set_context dll_Perl_set_context # define Perl_set_context dll_Perl_set_context
# if (PERL_REVISION == 5) && (PERL_VERSION >= 14) # if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
@@ -311,6 +314,9 @@ static SV* (*Perl_call_method)(pTHX_ const char*, I32);
static void (*Perl_pop_scope)(pTHX); static void (*Perl_pop_scope)(pTHX);
static void (*Perl_push_scope)(pTHX); static void (*Perl_push_scope)(pTHX);
static void (*Perl_save_int)(pTHX_ int*); 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_stack_grow)(pTHX_ SV**, SV**p, int);
static SV** (*Perl_set_context)(void*); static SV** (*Perl_set_context)(void*);
#if (PERL_REVISION == 5) && (PERL_VERSION >= 14) #if (PERL_REVISION == 5) && (PERL_VERSION >= 14)
@@ -440,6 +446,9 @@ static struct {
{"Perl_pop_scope", (PERL_PROC*)&Perl_pop_scope}, {"Perl_pop_scope", (PERL_PROC*)&Perl_pop_scope},
{"Perl_push_scope", (PERL_PROC*)&Perl_push_scope}, {"Perl_push_scope", (PERL_PROC*)&Perl_push_scope},
{"Perl_save_int", (PERL_PROC*)&Perl_save_int}, {"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_stack_grow", (PERL_PROC*)&Perl_stack_grow},
{"Perl_set_context", (PERL_PROC*)&Perl_set_context}, {"Perl_set_context", (PERL_PROC*)&Perl_set_context},
#if (PERL_REVISION == 5) && (PERL_VERSION >= 14) #if (PERL_REVISION == 5) && (PERL_VERSION >= 14)

2
src/version.c
View File

@@ -734,6 +734,8 @@ static char *(features[]) =
static int included_patches[] = static int included_patches[] =
{ /* Add new patch number below this line */ { /* Add new patch number below this line */
/**/
321,
/**/ /**/
320, 320,
/**/ /**/