From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 1 Feb 2006 20:26:46 +0000 (+0000)
Subject: Correct my comment, so that it's actually useful. :-)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3169b5731281028307a4d52e7c44fbd8c390ec0d;p=p5sagit%2Fp5-mst-13.2.git

Correct my comment, so that it's actually useful. :-)

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

diff --git a/sv.c b/sv.c
index e2304e6..9afb6ce 100644
--- a/sv.c
+++ b/sv.c
@@ -3270,7 +3270,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV *sstr, I32 flags)
 	}
 	if (sflags & SVp_IOK) {
 	    /* Must do this otherwise some other overloaded use of 0x80000000
-	       gets confused. Probably 0x80000000 */
+	       gets confused. Probably SVprv_WEAKREF */
 	    if (sflags & SVf_IVisUV)
 		SvIsUV_on(dstr);
 	    SvIV_set(dstr, SvIVX(sstr));