diff options
author | Yves Orton <yves.orton@booking.com> | 2014-01-30 14:02:44 +0800 |
---|---|---|
committer | Yves Orton <yves.orton@booking.com> | 2014-01-31 01:45:34 +0800 |
commit | e3e400ec345b9fd8b4129bb36c3d0b73c95cadcd (patch) | |
tree | be82a1eac4b7b69c34290313737514197b275b72 /regcomp.h | |
parent | e80e3195a56ee8ba20dc0e0f5d5381af5ec5ac33 (diff) | |
download | perl-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.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -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 */ |