X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;ds=sidebyside;f=autovivification.xs;h=222b3a7cae06375674841d622273d5091f0e39e1;hb=cfd4bbeefd3356b9728b9d71ac50d6cf80375812;hp=4f7a212baa2a829bdf3bd7a95b4cb216920bab3d;hpb=f188eeceb45dd21b7a80346a1f57c06d7d192080;p=perl%2Fmodules%2Fautovivification.git

diff --git a/autovivification.xs b/autovivification.xs
index 4f7a212..222b3a7 100644
--- a/autovivification.xs
+++ b/autovivification.xs
@@ -49,12 +49,17 @@
 #endif
 
 #ifndef A_MULTIPLICITY
-# if defined(MULTIPLICITY) || defined(PERL_IMPLICIT_CONTEXT)
+# if defined(MULTIPLICITY)
 #  define A_MULTIPLICITY 1
 # else
 #  define A_MULTIPLICITY 0
 # endif
 #endif
+#if A_MULTIPLICITY
+# ifndef PERL_IMPLICIT_CONTEXT
+#  error MULTIPLICITY builds must set PERL_IMPLICIT_CONTEXT
+# endif
+#endif
 
 #ifndef tTHX
 # define tTHX PerlInterpreter*