Change 11313 by jhi@alpha on 2001/07/12 16:12:23
Subject: Re: [PATCH] Threadsafe PMOPs! We might still win this war.
From: Doug MacEachern <[EMAIL PROTECTED]>
Date: Thu, 12 Jul 2001 10:11:28 -0700 (PDT)
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/op.c#414 edit
Differences ...
==== //depot/perl/op.c#414 (text) ====
Index: perl/op.c
--- perl/op.c.~1~ Thu Jul 12 10:15:05 2001
+++ perl/op.c Thu Jul 12 10:15:05 2001
@@ -2951,7 +2951,7 @@
#ifdef USE_ITHREADS
{
SV* repointer = newSViv(0);
- av_push(PL_regex_padav,repointer);
+ av_push(PL_regex_padav,SvREFCNT_inc(repointer));
pmop->op_pmoffset = av_len(PL_regex_padav);
PL_regex_pad = AvARRAY(PL_regex_padav);
}
End of Patch.
