In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/b3057643d885e4a0731c03045a8c66e4fb9cd662?hp=f70a2f5652ad183b5a2f30455d893099191d896d>
- Log ----------------------------------------------------------------- commit b3057643d885e4a0731c03045a8c66e4fb9cd662 Author: Karl Williamson <k...@cpan.org> Date: Mon Oct 17 20:35:36 2016 -0600 utf8.c: Reflow 2 lines, so it is clear they are 2. THis caused some confusion, see <2b6ce3f8-b566-4581-b7e3-815c45f37...@petdance.com> so I reflowed things. ----------------------------------------------------------------------- Summary of changes: utf8.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/utf8.c b/utf8.c index a60fb50..8646323 100644 --- a/utf8.c +++ b/utf8.c @@ -1079,8 +1079,9 @@ Perl_utf8n_to_uvchr_error(pTHX_ const U8 *s, /* Now, loop through the remaining bytes in the character's sequence, * accumulating each into the working value as we go. Be sure to not look * past the end of the input string */ - send = adjusted_send - = (U8*) s0 + ((expectlen <= curlen) ? expectlen : curlen); + send = adjusted_send = (U8*) s0 + ((expectlen <= curlen) + ? expectlen + : curlen); for (s = s0 + 1; s < send; s++) { if (LIKELY(UTF8_IS_CONTINUATION(*s))) { uv = UTF8_ACCUMULATE(uv, *s); -- Perl5 Master Repository