From: Father Chrysostomos <sprout@cpan.org>
Date: Thu, 6 Oct 2011 04:45:05 +0000 (-0700)
Subject: Fix diag.t failure with diag_listed_as comment
X-Git-Tag: v5.15.4~132^2~22
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/dff6b275d9768a8dbf761df51485362cff36ba24

Fix diag.t failure with diag_listed_as comment
---

diff --git a/sv.c b/sv.c
index 7cbf26c..742518a 100644
--- a/sv.c
+++ b/sv.c
@@ -14317,6 +14317,7 @@ Perl_report_uninit(pTHX_ const SV *uninit_sv)
 	    if (varname)
 		sv_insert(varname, 0, 0, " ", 1);
 	}
+	/* diag_listed_as: Use of uninitialized value%s */
 	Perl_warner(aTHX_ packWARN(WARN_UNINITIALIZED), PL_warn_uninit_sv,
 		SVfARG(varname ? varname : &PL_sv_no),
 		" in ", OP_DESC(PL_op));