From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Sat, 16 Jun 2007 06:10:19 +0000 (+0000)
Subject: More portability nits by Jarkko
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=adf4e37aa9473154c90ec95e0bce0894d66af09f;p=p5sagit%2Fp5-mst-13.2.git

More portability nits by Jarkko

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

diff --git a/ext/util/make_ext b/ext/util/make_ext
index cd1db5a..c856bbf 100644
--- a/ext/util/make_ext
+++ b/ext/util/make_ext
@@ -120,7 +120,7 @@ nonxs)      makeargs="";
 esac
 
 if test ! -f $makefile ; then
-	test -f Makefile.PL && ../$depth/miniperl -I../$depth/lib Makefile.PL INSTALLDIRS=perl PERL_CORE=1 $passthru
+	test -f Makefile.PL && $run ../$depth/miniperl -I../$depth/lib Makefile.PL INSTALLDIRS=perl PERL_CORE=1 $passthru
 fi
 if test ! -f $makefile ; then
 	echo "Warning: No Makefile!"
diff --git a/gv.h b/gv.h
index 8494137..66dedb7 100644
--- a/gv.h
+++ b/gv.h
@@ -88,7 +88,7 @@ Return the SV from the GV.
 #endif
 
 #define GvREFCNT(gv)	(GvGP(gv)->gp_refcnt)
-#define GvIO(gv)	((gv) && SvTYPE((SV*)gv) == SVt_PVGV && GvGP(gv) ? GvIOp(gv) : 0)
+#define GvIO(gv)	((gv) && SvTYPE((SV*)gv) == SVt_PVGV && GvGP(gv) ? GvIOp(gv) : NULL)
 #define GvIOp(gv)	(GvGP(gv)->gp_io)
 #define GvIOn(gv)	(GvIO(gv) ? GvIOp(gv) : GvIOp(gv_IOadd(gv)))
 
diff --git a/hv.c b/hv.c
index 032f4c2..cf0f3f4 100644
--- a/hv.c
+++ b/hv.c
@@ -2011,7 +2011,7 @@ Perl_hv_name_set(pTHX_ HV *hv, const char *name, U32 len, U32 flags)
 	iter = hv_auxinit(hv);
     }
     PERL_HASH(hash, name, len);
-    iter->xhv_name = name ? share_hek(name, len, hash) : 0;
+    iter->xhv_name = name ? share_hek(name, len, hash) : NULL;
 }
 
 AV **