projects / packages / vim.git / blame
| Commit | Line | Data |
|---|---|---|
| 8587d00a AM |
1 | To: vim-dev@vim.org |
| 2 | Subject: Patch 7.2.363 | |
| 3 | Fcc: outbox | |
| 4 | From: Bram Moolenaar <Bram@moolenaar.net> | |
| 5 | Mime-Version: 1.0 | |
| 6 | Content-Type: text/plain; charset=UTF-8 | |
| 7 | Content-Transfer-Encoding: 8bit | |
| 8 | ------------ | |
| 9 | ||
| 10 | Patch 7.2.363 | |
| 11 | Problem: Can't dynamically load Perl 5.10. | |
| 12 | Solution: Add the function Perl_croak_xs_usage. (Sergey Khorev) | |
| 13 | Files: src/if_perl.xs | |
| 14 | ||
| 15 | ||
| 16 | *** ../vim-7.2.362/src/if_perl.xs 2009-11-11 14:45:36.000000000 +0100 | |
| 17 | --- src/if_perl.xs 2010-02-17 16:33:16.000000000 +0100 | |
| 18 | *************** | |
| 19 | *** 93,98 **** | |
| 20 | --- 93,101 ---- | |
| 21 | # define perl_free dll_perl_free | |
| 22 | # define Perl_get_context dll_Perl_get_context | |
| 23 | # define Perl_croak dll_Perl_croak | |
| 24 | + # if (PERL_REVISION == 5) && (PERL_VERSION >= 10) | |
| 25 | + # define Perl_croak_xs_usage dll_Perl_croak_xs_usage | |
| 26 | + # endif | |
| 27 | # ifndef PROTO | |
| 28 | # define Perl_croak_nocontext dll_Perl_croak_nocontext | |
| 29 | # define Perl_call_argv dll_Perl_call_argv | |
| 30 | *************** | |
| 31 | *** 202,207 **** | |
| 32 | --- 205,213 ---- | |
| 33 | static int (*perl_parse)(PerlInterpreter*, XSINIT_t, int, char**, char**); | |
| 34 | static void* (*Perl_get_context)(void); | |
| 35 | static void (*Perl_croak)(pTHX_ const char*, ...); | |
| 36 | + #if (PERL_REVISION == 5) && (PERL_VERSION >= 10) | |
| 37 | + static void (*Perl_croak_xs_usage)(pTHX_ const CV *const, const char *const params); | |
| 38 | + #endif | |
| 39 | static void (*Perl_croak_nocontext)(const char*, ...); | |
| 40 | static I32 (*Perl_dowantarray)(pTHX); | |
| 41 | static void (*Perl_free_tmps)(pTHX); | |
| 42 | *************** | |
| 43 | *** 306,311 **** | |
| 44 | --- 312,320 ---- | |
| 45 | {"perl_parse", (PERL_PROC*)&perl_parse}, | |
| 46 | {"Perl_get_context", (PERL_PROC*)&Perl_get_context}, | |
| 47 | {"Perl_croak", (PERL_PROC*)&Perl_croak}, | |
| 48 | + #if (PERL_REVISION == 5) && (PERL_VERSION >= 10) | |
| 49 | + {"Perl_croak_xs_usage", (PERL_PROC*)&Perl_croak_xs_usage}, | |
| 50 | + #endif | |
| 51 | {"Perl_croak_nocontext", (PERL_PROC*)&Perl_croak_nocontext}, | |
| 52 | {"Perl_dowantarray", (PERL_PROC*)&Perl_dowantarray}, | |
| 53 | {"Perl_free_tmps", (PERL_PROC*)&Perl_free_tmps}, | |
| 54 | *** ../vim-7.2.362/src/version.c 2010-02-17 16:31:27.000000000 +0100 | |
| 55 | --- src/version.c 2010-02-17 16:35:39.000000000 +0100 | |
| 56 | *************** | |
| 57 | *** 683,684 **** | |
| 58 | --- 683,686 ---- | |
| 59 | { /* Add new patch number below this line */ | |
| 60 | + /**/ | |
| 61 | + 363, | |
| 62 | /**/ | |
| 63 | ||
| 64 | -- | |
| 65 | If you're sending someone Styrofoam, what do you pack it in? | |
| 66 | ||
| 67 | /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\ | |
| 68 | /// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\ | |
| 69 | \\\ download, build and distribute -- http://www.A-A-P.org /// | |
| 70 | \\\ help me help AIDS victims -- http://ICCF-Holland.org /// |