diff options
| author | Steven Schubiger <schubiger@cpan.org> | 2006-02-03 17:24:49 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-02-03 16:03:01 +0000 |
| commit | a0714e2c8319bd04d1f7d262de652b6b5ec054f7 (patch) | |
| tree | d8689d10ef1bdbdd3c93c50a330fb6406d477995 /pp_hot.c | |
| parent | 157e3fc8c802010d855ef1c01ff62a891bb5e20d (diff) | |
| download | perl-a0714e2c8319bd04d1f7d262de652b6b5ec054f7.tar.gz | |
Re: [PATCH] s/Null(gv|hv|sv)/NULL/g
Message-ID: <20060203152449.GI12591@accognoscere.homeunix.org>
Date: Fri, 3 Feb 2006 16:24:49 +0100
p4raw-id: //depot/perl@27065
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 18 |
1 files changed, 9 insertions, 9 deletions
@@ -1494,7 +1494,7 @@ yup: /* Confirmed by INTUIT */ rx->subbeg = savepvn(t, strend - t); #ifdef PERL_OLD_COPY_ON_WRITE - rx->saved_copy = Nullsv; + rx->saved_copy = NULL; #endif } rx->sublen = strend - t; @@ -1961,7 +1961,7 @@ PP(pp_iter) if (SvMAGICAL(av) || AvREIFY(av)) { SV * const * const svp = av_fetch(av, --cx->blk_loop.iterix, FALSE); - sv = svp ? *svp : Nullsv; + sv = svp ? *svp : NULL; } else { sv = AvARRAY(av)[--cx->blk_loop.iterix]; @@ -1974,7 +1974,7 @@ PP(pp_iter) if (SvMAGICAL(av) || AvREIFY(av)) { SV * const * const svp = av_fetch(av, ++cx->blk_loop.iterix, FALSE); - sv = svp ? *svp : Nullsv; + sv = svp ? *svp : NULL; } else { sv = AvARRAY(av)[++cx->blk_loop.iterix]; @@ -1982,7 +1982,7 @@ PP(pp_iter) } if (sv && SvIS_FREED(sv)) { - *itersvp = Nullsv; + *itersvp = NULL; Perl_croak(aTHX_ "Use of freed value in iteration"); } @@ -1994,7 +1994,7 @@ PP(pp_iter) SV *lv = cx->blk_loop.iterlval; if (lv && SvREFCNT(lv) > 1) { SvREFCNT_dec(lv); - lv = Nullsv; + lv = NULL; } if (lv) SvREFCNT_dec(LvTARG(lv)); @@ -2045,10 +2045,10 @@ PP(pp_subst) #ifdef PERL_OLD_COPY_ON_WRITE bool is_cow; #endif - SV *nsv = Nullsv; + SV *nsv = NULL; /* known replacement string? */ - dstr = (pm->op_pmflags & PMf_CONST) ? POPs : Nullsv; + dstr = (pm->op_pmflags & PMf_CONST) ? POPs : NULL; if (PL_op->op_flags & OPf_STACKED) TARG = POPs; else if (PL_op->op_private & OPpTARGET_MY) @@ -2971,7 +2971,7 @@ PP(pp_aelem) lv = sv_newmortal(); sv_upgrade(lv, SVt_PVLV); LvTYPE(lv) = 'y'; - sv_magic(lv, Nullsv, PERL_MAGIC_defelem, NULL, 0); + sv_magic(lv, NULL, PERL_MAGIC_defelem, NULL, 0); LvTARG(lv) = SvREFCNT_inc(av); LvTARGOFF(lv) = elem; LvTARGLEN(lv) = 1; @@ -3056,7 +3056,7 @@ S_method_common(pTHX_ SV* meth, U32* hashp) HV* stash; STRLEN namelen; const char* packname = NULL; - SV *packsv = Nullsv; + SV *packsv = NULL; STRLEN packlen; const char * const name = SvPV_const(meth, namelen); SV * const sv = *(PL_stack_base + TOPMARK + 1); |