Change 11569 by jhi@alpha on 2001/08/04 14:09:09
Subject: Re: [patch] refcount re ops
From: Abhijit Menon-Sen <[EMAIL PROTECTED]>
Date: Sat, 4 Aug 2001 08:54:55 +0530
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/sv.c#452 edit
Differences ...
==== //depot/perl/sv.c#452 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~ Sat Aug 4 08:15:05 2001
+++ perl/sv.c Sat Aug 4 08:15:05 2001
@@ -8403,7 +8403,8 @@
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':
End of Patch.
