diff options
| author | Yves Orton <yves.orton@booking.com> | 2014-01-30 18:35:02 +0800 |
|---|---|---|
| committer | Yves Orton <yves.orton@booking.com> | 2014-01-31 01:45:34 +0800 |
| commit | 58430ea8e40621565404595aac210ff61babed01 (patch) | |
| tree | ed36f239bb5bc183548b2854c7d3532b17a50ba7 /regexp.h | |
| parent | 0d331aaf61fba3b76c8d35852b94950c028661de (diff) | |
| download | perl-58430ea8e40621565404595aac210ff61babed01.tar.gz | |
move RXf_GPOS_SEEN and RXf_GPOS_FLOAT to intflags
This required removing the RXf_GPOS_CHECK mask as it uses one flag
that will stay in extflags for now (RXf_ANCH_GPOS), and one flag that
moves to intflags (RXf_GPOS_SEEN). This mask is strange however, as
you cant have RXf_ANCH_GPOS without having RXf_GPOS_SEEN so I dont
know why we test both. Further investigation required.
Diffstat (limited to 'regexp.h')
| -rw-r--r-- | regexp.h | 9 |
1 files changed, 4 insertions, 5 deletions
@@ -389,20 +389,19 @@ get_regex_charset_name(const U32 flags, STRLEN* const lenp) #define RXf_ANCH_MBOL (1<<(RXf_BASE_SHIFT+1)) #define RXf_ANCH_SBOL (1<<(RXf_BASE_SHIFT+2)) #define RXf_ANCH_GPOS (1<<(RXf_BASE_SHIFT+3)) -#define RXf_GPOS_SEEN (1<<(RXf_BASE_SHIFT+4)) -#define RXf_GPOS_FLOAT (1<<(RXf_BASE_SHIFT+5)) +#define RXf_UNUSED1 (1<<(RXf_BASE_SHIFT+4)) +#define RXf_UNUSED2 (1<<(RXf_BASE_SHIFT+5)) /* two bits here */ #define RXf_ANCH (RXf_ANCH_BOL|RXf_ANCH_MBOL|RXf_ANCH_GPOS|RXf_ANCH_SBOL) -#define RXf_GPOS_CHECK (RXf_GPOS_SEEN|RXf_ANCH_GPOS) #define RXf_ANCH_SINGLE (RXf_ANCH_SBOL|RXf_ANCH_GPOS) /* What we have seen */ #define RXf_NO_INPLACE_SUBST (1<<(RXf_BASE_SHIFT+6)) #define RXf_EVAL_SEEN (1<<(RXf_BASE_SHIFT+7)) -#define RXf_UNUSED1 (1<<(RXf_BASE_SHIFT+8)) +#define RXf_UNUSED3 (1<<(RXf_BASE_SHIFT+8)) /* Special */ -#define RXf_UNUSED2 (1<<(RXf_BASE_SHIFT+9)) +#define RXf_UNUSED4 (1<<(RXf_BASE_SHIFT+9)) #define RXf_CHECK_ALL (1<<(RXf_BASE_SHIFT+10)) /* UTF8 related */ |