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 # define DEBUGGING_RE_ONLY 9 #endif 10 11 /* We *really* need to overwrite these symbols: */ 12 #define Perl_regexec_flags my_regexec 13 #define Perl_regdump my_regdump 14 #define Perl_regprop my_regprop 15 #define Perl_re_intuit_start my_re_intuit_start 16 #define Perl_re_compile my_re_compile 17 #define Perl_re_op_compile my_re_op_compile 18 #define Perl_regfree_internal my_regfree 19 #define Perl_re_intuit_string my_re_intuit_string 20 #define Perl_regdupe_internal my_regdupe 21 #define Perl_reg_numbered_buff_fetch my_reg_numbered_buff_fetch 22 #define Perl_reg_numbered_buff_store my_reg_numbered_buff_store 23 #define Perl_reg_numbered_buff_length my_reg_numbered_buff_length 24 #define Perl_reg_named_buff my_reg_named_buff 25 #define Perl_reg_named_buff_iter my_reg_named_buff_iter 26 #define Perl_reg_named_buff_fetch my_reg_named_buff_fetch 27 #define Perl_reg_named_buff_exists my_reg_named_buff_exists 28 #define Perl_reg_named_buff_firstkey my_reg_named_buff_firstkey 29 #define Perl_reg_named_buff_nextkey my_reg_named_buff_nextkey 30 #define Perl_reg_named_buff_scalar my_reg_named_buff_scalar 31 #define Perl_reg_named_buff_all my_reg_named_buff_all 32 #define Perl_reg_qr_package my_reg_qr_package 33 34 #define PERL_NO_GET_CONTEXT 35 36 /* 37 * ex: set ts=8 sts=4 sw=4 et: 38 */ 39