diff options
| author | Karl Williamson <khw@cpan.org> | 2014-09-17 12:16:12 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2014-09-29 11:07:40 -0600 |
| commit | 13f27704e67ca16eefc14851c1cbf02be39509c6 (patch) | |
| tree | 0f14fd837ee03d895c376f464d1e9a37dd46993e /op_reg_common.h | |
| parent | 81a9a93bd8cf15be6db1942f8e44c590ecbace15 (diff) | |
| download | perl-13f27704e67ca16eefc14851c1cbf02be39509c6.tar.gz | |
Up regex flags limit for (??{})
Previously the regex pattern compilation flags needed for this construct
would fit into an 8-bit byte. This conveniently fits into the flags
structure element of a regnode. There are changes coming that require
more than 8 bits, so in preparation, this commit adds an argument to the
node that implements (??{}) (31-bits usable for flags), and moves the
storage to that.
Diffstat (limited to 'op_reg_common.h')
| -rw-r--r-- | op_reg_common.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/op_reg_common.h b/op_reg_common.h index 9dcdaaec63..108589ee60 100644 --- a/op_reg_common.h +++ b/op_reg_common.h @@ -98,8 +98,11 @@ get_regex_charset(const U32 flags) #define RXf_PMf_COMPILETIME (RXf_PMf_MULTILINE|RXf_PMf_SINGLELINE|RXf_PMf_FOLD|RXf_PMf_EXTENDED|RXf_PMf_KEEPCOPY|RXf_PMf_CHARSET) #define RXf_PMf_FLAGCOPYMASK (RXf_PMf_MULTILINE|RXf_PMf_SINGLELINE|RXf_PMf_FOLD|RXf_PMf_EXTENDED|RXf_PMf_KEEPCOPY|RXf_PMf_CHARSET|RXf_PMf_SPLIT) -#if RXf_PMf_COMPILETIME > 255 -# error RXf_PMf_COMPILETIME wont fit in U8 flags field of eval node + /* Exclude win32 because it can't cope with I32_MAX definition */ +#ifndef WIN32 +# if RXf_PMf_COMPILETIME > I32_MAX +# error RXf_PMf_COMPILETIME wont fit in arg2 field of eval node +# endif #endif /* These copies need to be numerical or defsubs_h.PL won't know about them. */ |