diff options
author | Yves Orton <demerphq@gmail.com> | 2006-09-10 00:00:05 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-09-11 10:04:19 +0000 |
commit | 1de063289cf096bd67e3d9d1b4a6dca2498966fa (patch) | |
tree | 624db769c58230025a7b28c45d4cbd107daa75be /embed.h | |
parent | e2e369dbafb5e29919b75b3f221700a38e4a5d42 (diff) | |
download | perl-1de063289cf096bd67e3d9d1b4a6dca2498966fa.tar.gz |
Teach regex optimiser how to handle (?=) and (?<=) properly.
Message-ID: <9b18b3110609091300x1fd0b15dt32932902a0a80674@mail.gmail.com>
p4raw-id: //depot/perl@28816
Diffstat (limited to 'embed.h')
-rw-r--r-- | embed.h | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -1356,6 +1356,7 @@ #define regcppush S_regcppush #define regcppop S_regcppop #define reghop3 S_reghop3 +#define reghop4 S_reghop4 #define reghopmaybe3 S_reghopmaybe3 #define find_byclass S_find_byclass #define to_utf8_substr S_to_utf8_substr @@ -3504,14 +3505,14 @@ #define join_exact(a,b,c,d,e,f) S_join_exact(aTHX_ a,b,c,d,e,f) #define regwhite S_regwhite #define nextchar(a) S_nextchar(aTHX_ a) -#define scan_commit(a,b) S_scan_commit(aTHX_ a,b) +#define scan_commit(a,b,c) S_scan_commit(aTHX_ a,b,c) #define cl_anything S_cl_anything #define cl_is_anything S_cl_is_anything #define cl_init S_cl_init #define cl_init_zero S_cl_init_zero #define cl_and S_cl_and #define cl_or S_cl_or -#define study_chunk(a,b,c,d,e,f,g) S_study_chunk(aTHX_ a,b,c,d,e,f,g) +#define study_chunk(a,b,c,d,e,f,g,h) S_study_chunk(aTHX_ a,b,c,d,e,f,g,h) #define add_data S_add_data #endif #ifdef PERL_CORE @@ -3542,6 +3543,7 @@ #define regcppush(a) S_regcppush(aTHX_ a) #define regcppop(a) S_regcppop(aTHX_ a) #define reghop3 S_reghop3 +#define reghop4 S_reghop4 #define reghopmaybe3 S_reghopmaybe3 #define find_byclass(a,b,c,d,e) S_find_byclass(aTHX_ a,b,c,d,e) #define to_utf8_substr(a) S_to_utf8_substr(aTHX_ a) |