1 #ifndef engine_h 2 #define engine_h 3 4 /* necessary to include regcomp.h in perl-5.34 */ 5 #define PERL_EXT_RE_BUILD 6 7 #include "EXTERN.h" 8 #include "perl.h" 9 #include "XSUB.h" 10 11 /* Set on error (i.e. failed memory allocation, unexpected regexp 12 construct), used by the XS glue as an argument to croak. Value 13 isn't freed - it must be a literal string. */ 14 extern char *rc_error; 15 16 /* Initializes module tables. Doesn't fail, must be called before any 17 other function below. */ 18 void rc_init(); 19 20 /* might croak but never returns null */ 21 REGEXP *rc_regcomp(SV *rs); 22 23 void rc_regfree(REGEXP *rx); 24 25 int rc_compare(REGEXP *pt1, REGEXP *pt2); 26 27 #endif 28