Mercurial > vim

diff src/if_perl.xs @ 1395:c845dcf7fafa v7.1.110

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated for version 7.1-110
author vimboss
date Sat, 15 Sep 2007 12:49:35 +0000
parents 35f3b20de2dd
children 01a0da54773e
line wrap: on
line diff
--- 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