diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-11-30 23:06:38 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-12-01 13:59:27 +0000 |
| commit | f81494553e6bd219aa5863d70777bd6f2b02d37f (patch) | |
| tree | 28d6d3ba348c4b0491ce06ed140e5cc39062e03a /ext/re | |
| parent | 80a702cd72c27fd870b2290d0adc07670c338743 (diff) | |
| download | perl-f81494553e6bd219aa5863d70777bd6f2b02d37f.tar.gz | |
Continue split of perl internal regexp structures from ones that are engine specific.
Message-ID: <9b18b3110611301306p5cad5deal4aa55559b8c8defd@mail.gmail.com>
p4raw-id: //depot/perl@29430
Diffstat (limited to 'ext/re')
| -rw-r--r-- | ext/re/re.xs | 5 | ||||
| -rw-r--r-- | ext/re/re_top.h | 5 |
2 files changed, 4 insertions, 6 deletions
diff --git a/ext/re/re.xs b/ext/re/re.xs index 8c6fbc1cc9..88479019e4 100644 --- a/ext/re/re.xs +++ b/ext/re/re.xs @@ -15,13 +15,13 @@ extern regexp* my_regcomp (pTHX_ char* exp, char* xend, PMOP* pm); extern I32 my_regexec (pTHX_ regexp* prog, char* stringarg, char* strend, char* strbeg, I32 minend, SV* screamer, void* data, U32 flags); -extern void my_regfree (pTHX_ struct regexp* r); + extern char* my_re_intuit_start (pTHX_ regexp *prog, SV *sv, char *strpos, char *strend, U32 flags, struct re_scream_pos_data_s *data); extern SV* my_re_intuit_string (pTHX_ regexp *prog); -extern char* my_reg_stringify (pTHX_ MAGIC *mg, STRLEN *lp, U32 *flags, I32 *haseval); +extern void my_regfree (pTHX_ struct regexp* r); #if defined(USE_ITHREADS) extern regexp* my_regdupe (pTHX_ const regexp *r, CLONE_PARAMS *param); #endif @@ -36,7 +36,6 @@ const struct regexp_engine my_reg_engine = { my_re_intuit_start, my_re_intuit_string, my_regfree, - my_reg_stringify, #if defined(USE_ITHREADS) my_regdupe #endif diff --git a/ext/re/re_top.h b/ext/re/re_top.h index 39b7fd122f..178c43355b 100644 --- a/ext/re/re_top.h +++ b/ext/re/re_top.h @@ -13,10 +13,9 @@ #define Perl_regprop my_regprop #define Perl_re_intuit_start my_re_intuit_start #define Perl_pregcomp my_regcomp -#define Perl_pregfree my_regfree +#define Perl_regfree_internal my_regfree #define Perl_re_intuit_string my_re_intuit_string -#define Perl_regdupe my_regdupe -#define Perl_reg_stringify my_reg_stringify +#define Perl_regdupe_internal my_regdupe #define PERL_NO_GET_CONTEXT |