Finally,
Patch to account for two new symbols (Perl_sv_2iv_flags,
Perl_newXS_flags) introduced in ActiveState perl for
build 822 and later (these symbols were preventing the
building of vim with dynamic support for perl).
Has been tested with ActiveState perl build 822 and
older build 810.
Hope the format in which it is submitted can be deciphered.
--Suresh
*** ..\vim7\src\if_perl.xs Tue Aug 28 21:43:48 2007
--- if_perl.xs Tue Aug 28 21:12:48 2007
***************
*** 109,114 ****
--- 109,118 ----
# else
# define Perl_sv_catpvn dll_Perl_sv_catpvn
# endif
+ #if (ACTIVE_PERL >= 822)
+ # define Perl_sv_2iv_flags dll_Perl_sv_2iv_flags
+ # define Perl_newXS_flags dll_Perl_newXS_flags
+ #endif
# define Perl_sv_free dll_Perl_sv_free
# define Perl_sv_isa dll_Perl_sv_isa
# define Perl_sv_magic dll_Perl_sv_magic
***************
*** 192,197 ****
--- 196,205 ----
#else
static void (*Perl_sv_catpvn)(pTHX_ SV*, const char*, STRLEN);
#endif
+ #if (ACTIVE_PERL >= 822)
+ static IV (*Perl_sv_2iv_flags)(pTHX_ SV* sv, I32 flags);
+ static CV * (*Perl_newXS_flags)(pTHX_ const char *name, XSUBADDR_t subaddr,
const char *const filename, const char *const proto,
U32 flags);
+ #endif
static void (*Perl_sv_free)(pTHX_ SV*);
static int (*Perl_sv_isa)(pTHX_ SV*, const char*);
static void (*Perl_sv_magic)(pTHX_ SV*, SV*, int, const char*, I32);
***************
*** 266,271 ****
--- 274,283 ----
{"Perl_sv_2pv_nolen", (PERL_PROC*)&Perl_sv_2pv_nolen},
#else
{"Perl_sv_2pv", (PERL_PROC*)&Perl_sv_2pv},
+ #endif
+ #if (ACTIVE_PERL >= 822)
+ {"Perl_sv_2iv_flags", (PERL_PROC*)&Perl_sv_2iv_flags},
+ {"Perl_newXS_flags", (PERL_PROC*)&Perl_newXS_flags},
#endif
{"Perl_sv_bless", (PERL_PROC*)&Perl_sv_bless},
#if (PERL_REVISION == 5) && (PERL_VERSION >= 8)
*** ..\vim7\src\Make_ming.mak Tue Aug 28 21:43:48 2007
--- Make_ming.mak Tue Aug 28 21:36:36 2007
***************
*** 276,281 ****
--- 276,285 ----
endif
endif
+ ifdef ACTIVE_PERL
+ CFLAGS += -DACTIVE_PERL=$(ACTIVE_PERL)
+ endif
+
ifdef MZSCHEME
CFLAGS += -I$(MZSCHEME)/include -DFEAT_MZSCHEME
-DMZSCHEME_COLLECTS=\"$(MZSCHEME)/collects\"
ifeq (yes, $(DYNAMIC_MZSCHEME))
--~--~---------~--~----~------------~-------~--~----~
You received this message from the "vim_dev" maillist.
For more information, visit http://www.vim.org/maillist.php
-~----------~----~----~----~------~----~------~--~---
