From 3b9b13e5647617b96f878ed302f67ad87838c8d5 Mon Sep 17 00:00:00 2001 From: Bram Moolenaar Date: Sat, 15 Sep 2007 12:49:35 +0000 Subject: updated for version 7.1-110 --- src/if_perl.xs | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) (limited to 'src/if_perl.xs') diff --git a/src/if_perl.xs b/src/if_perl.xs index ca8f1a83d1..2e27fed24a 100644 --- a/src/if_perl.xs +++ b/src/if_perl.xs @@ -48,13 +48,15 @@ * The changes include addition of two symbols (Perl_sv_2iv_flags, * Perl_newXS_flags) not present in earlier releases. * - * Jan Dubois suggested the following guarding scheme: + * Jan Dubois suggested the following guarding scheme. + * + * Active State defined ACTIVEPERL_VERSION as a string in versions before + * 5.8.8; and so the comparison to 822 below needs to be guarded. */ -#if (ACTIVEPERL_VERSION >= 822) -# define PERL589_OR_LATER -#endif -#if (PERL_REVISION == 5) && (PERL_VERSION == 8) && (PERL_SUBVERSION >= 9) -# define PERL589_OR_LATER +#if (PERL_REVISION == 5) && (PERL_VERSION == 8) && (PERL_SUBVERSION >= 8) +# if (ACTIVEPERL_VERSION >= 822) || (PERL_SUBVERSION >= 9) +# define PERL589_OR_LATER +# endif #endif #if (PERL_REVISION == 5) && (PERL_VERSION >= 9) # define PERL589_OR_LATER -- cgit v1.2.3