diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-09-29 14:41:26 +0200 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2006-09-29 12:29:24 +0000 |
| commit | f9f4320a413e57e41ac9bf0d94d8c4e8dbe71ec8 (patch) | |
| tree | 28f2158bf3db85ad65e1be291366af1df07fb5b6 /pp.c | |
| parent | dfeee9b153e7ebbeaa1e263dad19a3e5a819bacd (diff) | |
| download | perl-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 'pp.c')
| -rw-r--r-- | pp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -4638,7 +4638,7 @@ PP(pp_split) && (rx->reganch & ROPT_CHECK_ALL) && !(rx->reganch & ROPT_ANCH)) { const int tail = (rx->reganch & RE_INTUIT_TAIL); - SV * const csv = CALLREG_INTUIT_STRING(aTHX_ rx); + SV * const csv = CALLREG_INTUIT_STRING(rx); len = rx->minlen; if (len == 1 && !(rx->reganch & ROPT_UTF8) && !tail) { @@ -4688,7 +4688,7 @@ PP(pp_split) { I32 rex_return; PUTBACK; - rex_return = CALLREGEXEC(aTHX_ rx, (char*)s, (char*)strend, (char*)orig, 1 , + rex_return = CALLREGEXEC(rx, (char*)s, (char*)strend, (char*)orig, 1 , sv, NULL, 0); SPAGAIN; if (rex_return == 0) |