From: George Greer <perl@greerga.m-l.org>
Date: Thu, 27 May 2010 01:12:37 +0000 (-0400)
Subject: Fix clang "incompatible operand types" error in ternary expressions.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1404b48744cfa915e3f54775feb4e9b6c10f3b91;p=p5sagit%2Fp5-mst-13.2.git

Fix clang "incompatible operand types" error in ternary expressions.
---

diff --git a/gv.h b/gv.h
index be4290d..7e412e5 100644
--- a/gv.h
+++ b/gv.h
@@ -49,7 +49,7 @@ struct gp {
 	   assert(!SvVALID(_gvname_hek));				\
 	   &(GvXPVGV(_gvname_hek)->xiv_u.xivu_namehek);			\
 	 }))
-#  define GvNAME_get(gv)	({ assert(GvNAME_HEK(gv)); HEK_KEY(GvNAME_HEK(gv)); })
+#  define GvNAME_get(gv)	({ assert(GvNAME_HEK(gv)); (char *)HEK_KEY(GvNAME_HEK(gv)); })
 #  define GvNAMELEN_get(gv)	({ assert(GvNAME_HEK(gv)); HEK_LEN(GvNAME_HEK(gv)); })
 #else
 #  define GvGP(gv)	((gv)->sv_u.svu_gp)