X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fre-engine-Hooks.git;a=blobdiff_plain;f=re_defs.h;fp=re_defs.h;h=1df3739f4371ec1748d587a2f407ec0b2648ab83;hp=6e749d3f97735a7d03af64a8fdcaa80be1003327;hb=5bf3d4775537378e1fab2796afa571d0a0cf6bfc;hpb=1d6014615be1c3832320632981e2c454b43edecf diff --git a/re_defs.h b/re_defs.h index 6e749d3..1df3739 100644 --- a/re_defs.h +++ b/re_defs.h @@ -1,20 +1,18 @@ -#ifndef REH_HAS_PERL -# define REH_HAS_PERL(R, V, S) (PERL_REVISION > (R) || (PERL_REVISION == (R) && (PERL_VERSION > (V) || (PERL_VERSION == (V) && (PERL_SUBVERSION >= (S)))))) -#endif +#include "xsh/caps.h" /* XSH_HAS_PERL() */ EXTERN_C void reh_save_re_context(pTHX); EXTERN_C regnode *reh_regnext(pTHX_ register regnode *); -#if REH_HAS_PERL(5, 11, 0) +#if XSH_HAS_PERL(5, 11, 0) EXTERN_C REGEXP *reh_pregcomp(pTHX_ SV * const, const U32); #else EXTERN_C REGEXP *reh_pregcomp(pTHX_ const SV * const, const U32); #endif -#if REH_HAS_PERL(5, 11, 2) +#if XSH_HAS_PERL(5, 11, 2) EXTERN_C REGEXP *reh_reg_temp_copy(pTHX_ REGEXP *, REGEXP *); #else EXTERN_C REGEXP *reh_reg_temp_copy(pTHX_ REGEXP *); #endif -#if REH_HAS_PERL(5, 15, 7) +#if XSH_HAS_PERL(5, 15, 7) EXTERN_C SV *reh__invlist_contents(pTHX_ SV* const); #endif