diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-06-16 06:10:19 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-06-16 06:10:19 +0000 |
| commit | adf4e37aa9473154c90ec95e0bce0894d66af09f (patch) | |
| tree | 14d90118bc4a45b604773aba991bae2128a970bb | |
| parent | dce40316f42a4668ccea2765cda9168a586b4ffc (diff) | |
| download | perl-adf4e37aa9473154c90ec95e0bce0894d66af09f.tar.gz | |
More portability nits by Jarkko
p4raw-id: //depot/perl@31396
| -rw-r--r-- | ext/util/make_ext | 2 | ||||
| -rw-r--r-- | gv.h | 2 | ||||
| -rw-r--r-- | hv.c | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/ext/util/make_ext b/ext/util/make_ext index cd1db5aa6c..c856bbfff3 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!" @@ -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))) @@ -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 ** |