From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Sun, 30 Nov 1997 20:21:10 +0000 (+0000)
Subject: Fixup exports in non -DDEBUGGING case
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36c15d3fd87bb94724027176c49a6c0afbc14dc9;p=p5sagit%2Fp5-mst-13.2.git

Fixup exports in non -DDEBUGGING case

p4raw-id: //depot/ansiperl@340
---

diff --git a/win32/makedef.pl b/win32/makedef.pl
index f35e30f..91630d9 100644
--- a/win32/makedef.pl
+++ b/win32/makedef.pl
@@ -236,6 +236,12 @@ if ($define{'MULTIPLICITY'})
   close(THREAD); 
  } 
 
+unless ($define{'DEBUGGING'})
+ {
+  $skip_sym .= "Perl_runops_debug\n";
+  $skip_sym .= "Perl_sv_peek\n";
+ }
+
 # All symbols have a Perl_ prefix because that's what embed.h
 # sticks in front of them.