From 3377381085987f5c7f3856145d29b4bd2cec1d77 Mon Sep 17 00:00:00 2001
From: Abhijit Menon-Sen <ams@wiw.org>
Date: Sat, 4 Aug 2001 14:24:55 +0530
Subject: Re: [patch] refcount re ops Message-ID:
 <20010804085455.B526@lustre.dyn.wiw.org>

p4raw-id: //depot/perl@11569
---
 sv.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'sv.c')

diff --git a/sv.c b/sv.c
index 1194657a07..5269abac35 100644
--- a/sv.c
+++ b/sv.c
@@ -8403,7 +8403,8 @@ Perl_re_dup(pTHX_ REGEXP *r, clone_params *param)
 		ret->regstclass = (regnode*)d->data[i];
 		break;
 	    case 'o':
-		/* XXX: can this really be shared? */
+		/* Compiled op trees are readonly, and can thus be
+		   shared without duplication. */
 		d->data[i] = (void*)OpREFCNT_inc((OP*)r->data->data[i]);
 		break;
 	    case 'n':
-- 
cgit v1.2.1