summaryrefslogtreecommitdiff
path: root/dump.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-10-06 21:23:23 +0000
committerNicholas Clark <nick@ccl4.org>2007-10-06 21:23:23 +0000
commit1a9a51d4aa4d59879a3ad23406cec5aa050b7b1f (patch)
tree74dde97344686ee1d637c8a50426cdfaf6a058c1 /dump.c
parent617299157e790993f5e44437d5a60d79f697645c (diff)
downloadperl-1a9a51d4aa4d59879a3ad23406cec5aa050b7b1f.tar.gz
Remove remaining C<Nullch>s and C<Nullsv>s
p4raw-id: //depot/perl@32054
Diffstat (limited to 'dump.c')
-rw-r--r--dump.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/dump.c b/dump.c
index beeba772f0..aa1228b9a7 100644
--- a/dump.c
+++ b/dump.c
@@ -2115,7 +2115,7 @@ Perl_xmldump_sub(pTHX_ const GV *gv)
{
SV * const sv = sv_newmortal();
- gv_fullname3(sv, gv, Nullch);
+ gv_fullname3(sv, gv, NULL);
Perl_xmldump_indent(aTHX_ 0, PL_xmlfp, "\nSUB %s = ", SvPVX(sv));
if (CvXSUB(GvCV(gv)))
Perl_xmldump_indent(aTHX_ 0, PL_xmlfp, "(xsub 0x%"UVxf" %d)\n",
@@ -2132,7 +2132,7 @@ Perl_xmldump_form(pTHX_ const GV *gv)
{
SV * const sv = sv_newmortal();
- gv_fullname3(sv, gv, Nullch);
+ gv_fullname3(sv, gv, NULL);
Perl_xmldump_indent(aTHX_ 0, PL_xmlfp, "\nFORMAT %s = ", SvPVX(sv));
if (CvROOT(GvFORM(gv)))
op_xmldump(CvROOT(GvFORM(gv)));
@@ -2748,7 +2748,7 @@ Perl_do_op_xmldump(pTHX_ I32 level, PerlIO *file, const OP *o)
ENTER;
SAVEFREESV(tmpsv1);
SAVEFREESV(tmpsv2);
- gv_fullname3(tmpsv1, (GV*)cSVOPo->op_sv, Nullch);
+ gv_fullname3(tmpsv1, (GV*)cSVOPo->op_sv, NULL);
s = SvPV(tmpsv1,len);
sv_catxmlpvn(tmpsv2, s, len, 1);
S_xmldump_attr(aTHX_ level, file, "gv=\"%s\"", SvPV(tmpsv2, len));