From: Dave Mitchell <davem@fdisolutions.com>
Date: Thu, 18 Mar 2004 19:02:32 +0000 (+0000)
Subject: add code comment for change 22525
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5ab053b06800167d2bc083dd4186b23d7cb95fce;p=p5sagit%2Fp5-mst-13.2.git

add code comment for change 22525

p4raw-id: //depot/perl@22531
---

diff --git a/pp.c b/pp.c
index 866d554..d3434c3 100644
--- a/pp.c
+++ b/pp.c
@@ -2377,7 +2377,7 @@ PP(pp_complement)
 	register I32 anum;
 	STRLEN len;
 
-	(void)SvPV_nomg(sv,len);
+	(void)SvPV_nomg(sv,len); /* force check for uninit var */
 	sv_setsv_nomg(TARG, sv);
 	tmps = (U8*)SvPV_force(TARG, len);
 	anum = len;