From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 11 Nov 1998 21:05:42 +0000 (+0000)
Subject: provide -DPERL_POLLUTE
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1ba53475584b568fe81ad70f22128f596dffa82f;p=p5sagit%2Fp5-mst-13.2.git

provide -DPERL_POLLUTE

p4raw-id: //depot/perl@2226
---

diff --git a/embed.pl b/embed.pl
index 2ca20d0..709acc6 100755
--- a/embed.pl
+++ b/embed.pl
@@ -519,7 +519,7 @@ END
 
 print EM <<'END';
 
-#if 0 /* ndef MIN_PERL_DEFINE */	/* unsupported in 5.006 */
+#ifdef PERL_POLLUTE		/* unsupported in 5.006 */
 
 END
 
diff --git a/embedvar.h b/embedvar.h
index a0bbea0..297db71 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -906,7 +906,7 @@
 #endif /* PERL_GLOBAL_STRUCT */
 
 
-#if 0 /* ndef MIN_PERL_DEFINE */	/* unsupported in 5.006 */
+#ifdef PERL_POLLUTE		/* unsupported in 5.006 */
 
 #define DBsingle		PL_DBsingle
 #define DBsub			PL_DBsub