From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 28 Mar 2006 15:43:59 +0000 (+0000)
Subject: Only compile Perl_hv_assert with DEBUGGING.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=943795c2b00ef89ec677d4af7a0a6bfabab5c916;p=p5sagit%2Fp5-mst-13.2.git

Only compile Perl_hv_assert with DEBUGGING.

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

diff --git a/hv.c b/hv.c
index 86070e3..350ddd3 100644
--- a/hv.c
+++ b/hv.c
@@ -2522,6 +2522,8 @@ Check that a hash is in an internally consistent state.
 =cut
 */
 
+#ifdef DEBUGGING
+
 void
 Perl_hv_assert(pTHX_ HV *hv)
 {
@@ -2584,6 +2586,8 @@ Perl_hv_assert(pTHX_ HV *hv)
   HvEITER_set(hv, eiter);
 }
 
+#endif
+
 /*
  * Local variables:
  * c-indentation-style: bsd
diff --git a/makedef.pl b/makedef.pl
index 6f20f12..3745e19 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -585,6 +585,7 @@ unless ($define{'DEBUGGING'}) {
 		    Perl_debstackptrs
 		    Perl_pad_sv
 		    Perl_sv_peek
+		    Perl_hv_assert
 		    PL_block_type
 		    PL_watchaddr
 		    PL_watchok