diff options
| author | Leon Timmermans <fawaka@gmail.com> | 2021-04-19 18:49:52 +0200 |
|---|---|---|
| committer | Leon Timmermans <fawaka@gmail.com> | 2021-05-24 13:56:14 +0200 |
| commit | e6e9dd290698d47a0db9e1d676d2b82e0bb0a52b (patch) | |
| tree | e0122058bbf0ffb5df1de8d5af2088d6b98959f6 /proto.h | |
| parent | 18e5156b1786a26cd70a7f8ff84c10956d93faf3 (diff) | |
| download | perl-e6e9dd290698d47a0db9e1d676d2b82e0bb0a52b.tar.gz | |
Do not cache utf8 offsets for non-canonical lengths
In particular, if the length is beyond the end, it should not be stored as the end.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -6382,9 +6382,9 @@ STATIC STRLEN S_sv_pos_b2u_midway(pTHX_ const U8 *const s, const U8 *const targe STATIC STRLEN S_sv_pos_u2b_cached(pTHX_ SV *const sv, MAGIC **const mgp, const U8 *const start, const U8 *const send, STRLEN uoffset, STRLEN uoffset0, STRLEN boffset0); #define PERL_ARGS_ASSERT_SV_POS_U2B_CACHED \ assert(sv); assert(mgp); assert(start); assert(send) -STATIC STRLEN S_sv_pos_u2b_forwards(const U8 *const start, const U8 *const send, STRLEN *const uoffset, bool *const at_end); +STATIC STRLEN S_sv_pos_u2b_forwards(const U8 *const start, const U8 *const send, STRLEN *const uoffset, bool *const at_end, bool *canonical_position); #define PERL_ARGS_ASSERT_SV_POS_U2B_FORWARDS \ - assert(start); assert(send); assert(uoffset); assert(at_end) + assert(start); assert(send); assert(uoffset); assert(at_end); assert(canonical_position) STATIC STRLEN S_sv_pos_u2b_midway(const U8 *const start, const U8 *send, STRLEN uoffset, const STRLEN uend); #define PERL_ARGS_ASSERT_SV_POS_U2B_MIDWAY \ assert(start); assert(send) |