This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
SvRX() and SvRXOK() macros
[perl5.git] / ext / re / re_top.h
CommitLineData
54df2634
NC
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: */
84da74a7
YO
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
3c6f95d1 15#define Perl_re_compile my_re_compile
f8149455 16#define Perl_regfree_internal my_regfree
84da74a7 17#define Perl_re_intuit_string my_re_intuit_string
f8149455 18#define Perl_regdupe_internal my_regdupe
2fdbfb4d
AB
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
192b9cd1
AB
22#define Perl_reg_named_buff my_reg_named_buff
23#define Perl_reg_named_buff_iter my_reg_named_buff_iter
04c24be1
CB
24#define Perl_reg_named_buff_fetch my_reg_named_buff_fetch
25#define Perl_reg_named_buff_exists my_reg_named_buff_exists
26#define Perl_reg_named_buff_firstkey my_reg_named_buff_firstkey
27#define Perl_reg_named_buff_nextkey my_reg_named_buff_nextkey
28#define Perl_reg_named_buff_scalar my_reg_named_buff_scalar
29#define Perl_reg_named_buff_all my_reg_named_buff_all
49d7dfbc 30#define Perl_reg_qr_package my_reg_qr_package
54df2634
NC
31
32#define PERL_NO_GET_CONTEXT
33
34/*
35 * Local variables:
36 * c-indentation-style: bsd
37 * c-basic-offset: 4
38 * indent-tabs-mode: t
39 * End:
40 *
41 * ex: set ts=8 sts=4 sw=4 noet:
42 */