From: Vincent Pit Date: Tue, 21 Jul 2015 17:05:39 +0000 (-0300) Subject: Correct two prototypes on 5.20 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=4a9aed6a870d6a954c42bac71334dd440780b226;p=perl%2Fmodules%2Fre-engine-Hooks.git Correct two prototypes on 5.20 --- diff --git a/Hooks.xs b/Hooks.xs index d235880..9d3c6ba 100644 --- a/Hooks.xs +++ b/Hooks.xs @@ -121,8 +121,16 @@ EXTERN_C REGEXP *reh_re_compile(pTHX_ const SV * const, const U32); #else EXTERN_C REGEXP *reh_re_compile(pTHX_ SV * const, U32); #endif +#if REH_HAS_PERL(5, 19, 4) +EXTERN_C I32 reh_regexec_flags(pTHX_ REGEXP * const, char *, char *, char *, SSize_t, SV *, void *, U32); +#else EXTERN_C I32 reh_regexec_flags(pTHX_ REGEXP * const, char *, char *, char *, I32, SV *, void *, U32); +#endif +#if REH_HAS_PERL(5, 19, 1) +EXTERN_C char * reh_re_intuit_start(pTHX_ REGEXP * const, SV *, const char * const, char *, char *, U32, re_scream_pos_data *); +#else EXTERN_C char * reh_re_intuit_start(pTHX_ REGEXP * const, SV *, char *, char *, U32, re_scream_pos_data *); +#endif EXTERN_C SV * reh_re_intuit_string(pTHX_ REGEXP * const); EXTERN_C void reh_re_free(pTHX_ REGEXP * const); EXTERN_C void reh_reg_numbered_buff_fetch(pTHX_ REGEXP * const,