X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/6c5e080d01cb781ede98cb40c5af749e9d939e17..931b58fb28fa5ca73161678109fa052134ce70b3:/op.c

diff --git a/op.c b/op.c
index 8aca413..814c5e2 100644
--- a/op.c
+++ b/op.c
@@ -3818,7 +3818,7 @@ Perl_newASSIGNOP(pTHX_ I32 flags, OP *left, I32 optype, OP *right)
 	 * that value, we know we've got commonality.  We could use a
 	 * single bit marker, but then we'd have to make 2 passes, first
 	 * to clear the flag, then to test and set it.  To find somewhere
-	 * to store these values, evil chicanery is done with SvCUR().
+	 * to store these values, evil chicanery is done with SvUVX().
 	 */
 
 	{