X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pad.c;h=ea2969d576182754f0343c8b4e844971efb6ddf1;hb=6d7fb585cd8ad83f4523191641999603aa48eb76;hp=a98d6effabddd92bc0b507600cfd0e57b70cfe4c;hpb=fb8a983643e8a4ec3e57626fb8754442ebe19278;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pad.c b/pad.c index a98d6ef..ea2969d 100644 --- a/pad.c +++ b/pad.c @@ -297,7 +297,7 @@ Perl_pad_undef(pTHX_ CV* cv) if (!sv) continue; if (sv == (SV*)PL_comppad_name) - PL_comppad_name = Nullav; + PL_comppad_name = NULL; else if (sv == (SV*)PL_comppad) { PL_comppad = Null(PAD*); PL_curpad = Null(SV**); @@ -827,9 +827,9 @@ S_pad_findlex(pTHX_ const char *name, const CV* cv, U32 seq, int warn, new_offset = pad_add_name( SvPVX_const(*out_name_sv), (SvFLAGS(*out_name_sv) & SVpad_TYPED) - ? SvSTASH(*out_name_sv) : Nullhv, + ? SvSTASH(*out_name_sv) : NULL, (SvFLAGS(*out_name_sv) & SVpad_OUR) - ? GvSTASH(*out_name_sv) : Nullhv, + ? GvSTASH(*out_name_sv) : NULL, 1 /* fake */ ); @@ -1627,7 +1627,7 @@ Perl_pad_compname_type(pTHX_ const PADOFFSET po) if ( SvFLAGS(*av) & SVpad_TYPED ) { return SvSTASH(*av); } - return Nullhv; + return NULL; } /*