summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2006-09-29 14:41:26 +0200
committerH.Merijn Brand <h.m.brand@xs4all.nl>2006-09-29 12:29:24 +0000
commitf9f4320a413e57e41ac9bf0d94d8c4e8dbe71ec8 (patch)
tree28f2158bf3db85ad65e1be291366af1df07fb5b6 /op.c
parentdfeee9b153e7ebbeaa1e263dad19a3e5a819bacd (diff)
downloadperl-f9f4320a413e57e41ac9bf0d94d8c4e8dbe71ec8.tar.gz
Re: [PATCH] Add hook for re_dup() into regex engine as reg_dupe (make re pluggable under threads)
Message-ID: <9b18b3110609290341p11767110sec20a6fee2038a00@mail.gmail.com> p4raw-id: //depot/perl@28900
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 8872764a73..fbe455ed22 100644
--- a/op.c
+++ b/op.c
@@ -3225,7 +3225,7 @@ Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg)
if (DO_UTF8(pat))
pm->op_pmdynflags |= PMdf_UTF8;
/* FIXME - can we make this function take const char * args? */
- PM_SETRE(pm, CALLREGCOMP(aTHX_ (char*)p, (char*)p + plen, pm));
+ PM_SETRE(pm, CALLREGCOMP((char*)p, (char*)p + plen, pm));
if (strEQ("\\s+", PM_GETRE(pm)->precomp))
pm->op_pmflags |= PMf_WHITE;
#ifdef PERL_MAD