This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Re: [PATCH] Callbacks for named captures (%+ and %-)
[perl5.git] / ext / re / re_top.h
1 /* need to replace pregcomp et al, so enable that */
2 #ifndef PERL_IN_XSUB_RE
3 #  define PERL_IN_XSUB_RE
4 #endif
5 /* need access to debugger hooks */
6 #if defined(PERL_EXT_RE_DEBUG) && !defined(DEBUGGING)
7 #  define DEBUGGING
8 #endif
9
10 /* We *really* need to overwrite these symbols: */
11 #define Perl_regexec_flags      my_regexec
12 #define Perl_regdump            my_regdump
13 #define Perl_regprop            my_regprop
14 #define Perl_re_intuit_start    my_re_intuit_start
15 #define Perl_re_compile         my_re_compile
16 #define Perl_regfree_internal   my_regfree
17 #define Perl_re_intuit_string   my_re_intuit_string
18 #define Perl_regdupe_internal   my_regdupe
19 #define Perl_reg_numbered_buff_fetch  my_reg_numbered_buff_fetch
20 #define Perl_reg_numbered_buff_store  my_reg_numbered_buff_store
21 #define Perl_reg_numbered_buff_length  my_reg_numbered_buff_length
22 #define Perl_reg_named_buff      my_reg_named_buff
23 #define Perl_reg_named_buff_iter my_reg_named_buff_iter
24 #define Perl_reg_qr_package        my_reg_qr_package
25
26 #define PERL_NO_GET_CONTEXT
27
28 /*
29  * Local variables:
30  * c-indentation-style: bsd
31  * c-basic-offset: 4
32  * indent-tabs-mode: t
33  * End:
34  *
35  * ex: set ts=8 sts=4 sw=4 noet:
36  */