From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 8 Mar 2007 16:12:29 +0000 (+0000)
Subject: Warning fix. Since HePV's second argument is supposed
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b979de87f60b43f7673e6a7e8947db2dc281aed0;p=p5sagit%2Fp5-mst-13.2.git

Warning fix. Since HePV's second argument is supposed
to be an unsigned integer, there's not point in comparing
it to 0.

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

diff --git a/hv.h b/hv.h
index 555c6f0..2e1a506 100644
--- a/hv.h
+++ b/hv.h
@@ -303,8 +303,7 @@ C<SV*>.
 #define HeHASH(he)		HEK_HASH(HeKEY_hek(he))
 #define HePV(he,lp)		((HeKLEN(he) == HEf_SVKEY) ?		\
 				 SvPV(HeKEY_sv(he),lp) :		\
-				 (((lp = HeKLEN(he)) >= 0) ?		\
-				  HeKEY(he) : NULL))
+				 ((lp = HeKLEN(he)) >= 0))		\
 
 #define HeSVKEY(he)		((HeKEY(he) && 				\
 				  HeKLEN(he) == HEf_SVKEY) ?		\