From: Andy Dougherty <doughera@lafayette.edu>
Date: Tue, 20 Nov 2001 12:45:32 +0000 (-0500)
Subject: Re: [ID 20011117.127] Not OK: perl v5.7.2 +DEVEL13048 on i686-linux 2.4.15-pre6
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=41b16711800340b3b3f8b5592cd2ea300a59497b;p=p5sagit%2Fp5-mst-13.2.git

Re: [ID 20011117.127] Not OK: perl v5.7.2 +DEVEL13048 on i686-linux 2.4.15-pre6
Message-ID: <Pine.SOL.4.10.10111201240270.15132-100000@maxwell.phys.lafayette.edu>

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

diff --git a/ext/re/Makefile.PL b/ext/re/Makefile.PL
index f54f1cd..51573af 100644
--- a/ext/re/Makefile.PL
+++ b/ext/re/Makefile.PL
@@ -6,15 +6,6 @@ my $object = 're_exec$(OBJ_EXT) re_comp$(OBJ_EXT) re$(OBJ_EXT)';
 
 my $defines = '-DPERL_EXT_RE_BUILD -DPERL_EXT_RE_DEBUG';
 
-# We need to pretend that DEBUGGING is in effect even if it's
-# not but we need to remember that we pretended so we can avoid
-# linking to things that aren't there.
-
-if ( (($Config{'ccflags'} !~ /DEBUGGING/) && $^O ne 'VMS') || 
-     (exists($Config{'usedebugging_perl'}) && $Config{'usedebugging_perl'} ne 'Y') ) {
-  $defines .= ' -DDEBUGGING -DWAS_NOT_DEBUGGING';
-}
-
 WriteMakefile(
     NAME		=> 're',
     VERSION_FROM	=> 're.pm',
diff --git a/ext/re/re.xs b/ext/re/re.xs
index 3598409..98b7b82 100644
--- a/ext/re/re.xs
+++ b/ext/re/re.xs
@@ -1,3 +1,7 @@
+#if defined(PERL_EXT_RE_DEBUG) && !defined(DEBUGGING)
+#  define DEBUGGING
+#endif
+
 #define PERL_NO_GET_CONTEXT
 #include "EXTERN.h"
 #include "perl.h"