diff options
| author | Rafael Garcia-Suarez <rgs@consttype.org> | 2012-01-25 12:34:17 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2012-01-25 12:34:27 +0100 |
| commit | d3bcd21f9c56ad29603330017e1fef6e7910189b (patch) | |
| tree | 6255dc290c5b38b29b61eaf42ce443dbe1691f13 | |
| parent | 7a9b248bd4287aff0152aae161526c23245dc045 (diff) | |
| download | perl-d3bcd21f9c56ad29603330017e1fef6e7910189b.tar.gz | |
Initialize buffer to an empty string to avoid spurious uninitialized warnings
| -rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1189,7 +1189,7 @@ Perl_scalarvoid(pTHX_ OP *o) strnEQ(maybe_macro, "ig", 2)) useless = NULL; else { - SV * const dsv = newSV(0); + SV * const dsv = newSVpvs(""); SV* msv = sv_2mortal(Perl_newSVpvf(aTHX_ "a constant (%s)", pv_pretty(dsv, maybe_macro, SvCUR(sv), 32, NULL, NULL, |