From: Vincent Pit <vince@profvince.com>
Date: Wed, 17 Dec 2008 22:21:21 +0000 (+0100)
Subject: Don't redefine VMG_COMPAT_ARRAY_PUSH_NOLEN
X-Git-Tag: v0.27~23
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=040a327bd3b1c223b36d0013546d4970b4d9580e;p=perl%2Fmodules%2FVariable-Magic.git

Don't redefine VMG_COMPAT_ARRAY_PUSH_NOLEN
---

diff --git a/Magic.xs b/Magic.xs
index 49ba471..1b63117 100644
--- a/Magic.xs
+++ b/Magic.xs
@@ -121,10 +121,12 @@ STATIC SV *vmg_clone(pTHX_ SV *sv, tTHX owner) {
 #endif
 
 /* Applied to dev-5.9 as 25854, integrated to maint-5.8 as 28160 */
-#if !defined(VMG_COMPAT_ARRAY_PUSH_NOLEN) && (VMG_HAS_PERL_MAINT(5, 8, 9, 28160) || VMG_HAS_PERL_MAINT(5, 9, 3, 25854) || VMG_HAS_PERL(5, 10, 0))
-# define VMG_COMPAT_ARRAY_PUSH_NOLEN 1
-#else
-# define VMG_COMPAT_ARRAY_PUSH_NOLEN 0
+#ifndef VMG_COMPAT_ARRAY_PUSH_NOLEN
+# if VMG_HAS_PERL_MAINT(5, 8, 9, 28160) || VMG_HAS_PERL_MAINT(5, 9, 3, 25854) || VMG_HAS_PERL(5, 10, 0)
+#  define VMG_COMPAT_ARRAY_PUSH_NOLEN 1
+# else
+#  define VMG_COMPAT_ARRAY_PUSH_NOLEN 0
+# endif
 #endif
 
 /* Applied to dev-5.11 as 34908 */