In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/d3bcd21f9c56ad29603330017e1fef6e7910189b?hp=7a9b248bd4287aff0152aae161526c23245dc045>
- Log ----------------------------------------------------------------- commit d3bcd21f9c56ad29603330017e1fef6e7910189b Author: Rafael Garcia-Suarez <[email protected]> Date: Wed Jan 25 12:34:17 2012 +0100 Initialize buffer to an empty string to avoid spurious uninitialized warnings ----------------------------------------------------------------------- Summary of changes: op.c | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/op.c b/op.c index e31f742..30cc7f8 100644 --- a/op.c +++ b/op.c @@ -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, -- Perl5 Master Repository
