diff options
author | David Mitchell <davem@iabyn.com> | 2012-12-25 18:09:32 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2012-12-25 18:09:32 +0000 |
commit | 984e6dd18b2c93d4a6ae228bb9d2d98aadf7ca6e (patch) | |
tree | 869b7de1f2b2401a7eda4134742ca35370778d07 /embed.fnc | |
parent | 4fab19ce1519686c7468c2e8b79b34d7d9b7f5bc (diff) | |
download | perl-984e6dd18b2c93d4a6ae228bb9d2d98aadf7ca6e.tar.gz |
eliminate RF_utf8 flag from PL_reg_flags
This global flag indicates whether the currently executing regex is utf8.
Replace it with a boolean var local to to the matching function, and pass
it around via function args, or as a member of the regmatch_info struct.
This is a first step to eliminating PL_reg_flags.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -2032,7 +2032,9 @@ Es |U8 |regtail_study |NN struct RExC_state_t *pRExC_state \ ERs |bool |isFOO_lc |const U8 classnum|const U8 character ERs |bool |isFOO_utf8_lc |const U8 classnum|NN const U8* character ERs |I32 |regmatch |NN regmatch_info *reginfo|NN char *startpos|NN regnode *prog -ERs |I32 |regrepeat |NN const regexp *prog|NN char **startposp|NN const regnode *p|I32 max|int depth +ERs |I32 |regrepeat |NN const regexp *prog|NN char **startposp \ + |NN const regnode *p|I32 max|int depth \ + |bool is_utf8_pat ERs |I32 |regtry |NN regmatch_info *reginfo|NN char **startposp ERs |bool |reginclass |NULLOK const regexp * const prog|NN const regnode * const n|NN const U8 * const p\ |bool const utf8_target @@ -2049,7 +2051,10 @@ ERsn |U8* |reghop4 |NN U8 *s|I32 off|NN const U8 *llim \ |NN const U8 *rlim #endif ERsn |U8* |reghopmaybe3 |NN U8 *s|I32 off|NN const U8 *lim -ERs |char* |find_byclass |NN regexp * prog|NN const regnode *c|NN char *s|NN const char *strend|NULLOK regmatch_info *reginfo +ERs |char* |find_byclass |NN regexp * prog|NN const regnode *c \ + |NN char *s|NN const char *strend \ + |NULLOK regmatch_info *reginfo \ + |bool is_utf_pat Es |void |to_utf8_substr |NN regexp * prog Es |bool |to_byte_substr |NN regexp * prog ERs |I32 |reg_check_named_buff_matched |NN const regexp *rex \ |