summaryrefslogtreecommitdiff
path: root/regcomp.h
diff options
context:
space:
mode:
authorYves Orton <yves.orton@booking.com>2014-01-30 14:02:44 +0800
committerYves Orton <yves.orton@booking.com>2014-01-31 01:45:34 +0800
commite3e400ec345b9fd8b4129bb36c3d0b73c95cadcd (patch)
treebe82a1eac4b7b69c34290313737514197b275b72 /regcomp.h
parente80e3195a56ee8ba20dc0e0f5d5381af5ec5ac33 (diff)
downloadperl-e3e400ec345b9fd8b4129bb36c3d0b73c95cadcd.tar.gz
move RXf_NOSCAN from extflags to intflags as PREGf_NOSCAN
Includes some improvements to how we dump regexps so that when a regexp is for the standard perl engine we also show the intflags for the engine
Diffstat (limited to 'regcomp.h')
-rw-r--r--regcomp.h5
1 files changed, 5 insertions, 0 deletions
diff --git a/regcomp.h b/regcomp.h
index da762ccddb..d8f60db20c 100644
--- a/regcomp.h
+++ b/regcomp.h
@@ -125,12 +125,17 @@
*
* See regexp.h for flags used externally to the regexp engine
*/
+#define RXp_INTFLAGS(rx) ((rx)->intflags)
+#define RX_INTFLAGS(prog) RXp_INTFLAGS(ReANY(prog))
+
#define PREGf_SKIP 0x00000001
#define PREGf_IMPLICIT 0x00000002 /* Converted .* to ^.* */
#define PREGf_NAUGHTY 0x00000004 /* how exponential is this pattern? */
#define PREGf_VERBARG_SEEN 0x00000008
#define PREGf_CUTGROUP_SEEN 0x00000010
#define PREGf_USE_RE_EVAL 0x00000020 /* compiled with "use re 'eval'" */
+/* these used to be extflags, but are now intflags */
+#define PREGf_NOSCAN 0x00000040
/* this is where the old regcomp.h started */