This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add xs_handshake API
[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_re_op_compile      my_re_op_compile
17 #define Perl_regfree_internal   my_regfree
18 #define Perl_re_intuit_string   my_re_intuit_string
19 #define Perl_regdupe_internal   my_regdupe
20 #define Perl_reg_numbered_buff_fetch  my_reg_numbered_buff_fetch
21 #define Perl_reg_numbered_buff_store  my_reg_numbered_buff_store
22 #define Perl_reg_numbered_buff_length  my_reg_numbered_buff_length
23 #define Perl_reg_named_buff      my_reg_named_buff
24 #define Perl_reg_named_buff_iter my_reg_named_buff_iter
25 #define Perl_reg_named_buff_fetch    my_reg_named_buff_fetch    
26 #define Perl_reg_named_buff_exists   my_reg_named_buff_exists  
27 #define Perl_reg_named_buff_firstkey my_reg_named_buff_firstkey
28 #define Perl_reg_named_buff_nextkey  my_reg_named_buff_nextkey 
29 #define Perl_reg_named_buff_scalar   my_reg_named_buff_scalar  
30 #define Perl_reg_named_buff_all      my_reg_named_buff_all     
31 #define Perl_reg_qr_package        my_reg_qr_package
32
33 #define PERL_NO_GET_CONTEXT
34
35 /*
36  * Local variables:
37  * c-indentation-style: bsd
38  * c-basic-offset: 4
39  * indent-tabs-mode: nil
40  * End:
41  *
42  * ex: set ts=8 sts=4 sw=4 et:
43  */