diff options
author | Karl Williamson <khw@cpan.org> | 2017-12-08 10:38:24 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2017-12-08 22:27:44 -0700 |
commit | 46bb68f6ad0c0feabeb1ade587abd6da9c168cd3 (patch) | |
tree | ee5bc359a0b55fae5042b06e107c2812acc8f8c0 /inline.h | |
parent | b40579ffada21adfc9e94a8d206592c7923a5bbe (diff) | |
download | perl-46bb68f6ad0c0feabeb1ade587abd6da9c168cd3.tar.gz |
inline.h: White space only
Add indentation to account for block added in the previous commit around
this code.
Diffstat (limited to 'inline.h')
-rw-r--r-- | inline.h | 42 |
1 files changed, 21 insertions, 21 deletions
@@ -408,34 +408,34 @@ S_is_utf8_invariant_string_loc(const U8* const s, STRLEN len, const U8 ** ep) if ((STRLEN) (send - x) >= PERL_WORDSIZE) { - /* Process per-byte until reach word boundary. XXX This loop could be - * eliminated if we knew that this platform had fast unaligned reads */ + /* Process per-byte until reach word boundary. XXX This loop could be + * eliminated if we knew that this platform had fast unaligned reads */ while (PTR2nat(x) & PERL_WORD_BOUNDARY_MASK) { - if (! UTF8_IS_INVARIANT(*x)) { - if (ep) { - *ep = x; - } + if (! UTF8_IS_INVARIANT(*x)) { + if (ep) { + *ep = x; + } - return FALSE; + return FALSE; + } + x++; } - x++; - } - /* Process per-word as long as we have at least a full word left */ - while (x + PERL_WORDSIZE <= send) { - if ((* (PERL_WORDCAST *) x) & PERL_VARIANTS_WORD_MASK) { + /* Process per-word as long as we have at least a full word left */ + while (x + PERL_WORDSIZE <= send) { + if ((* (PERL_WORDCAST *) x) & PERL_VARIANTS_WORD_MASK) { - /* Found a variant. Just return if caller doesn't want its exact - * position */ - if (! ep) { - return FALSE; - } + /* Found a variant. Just return if caller doesn't want its + * exact position */ + if (! ep) { + return FALSE; + } - /* Otherwise fall into final loop to find which byte it is */ - break; + /* Otherwise fall into final loop to find which byte it is */ + break; + } + x += PERL_WORDSIZE; } - x += PERL_WORDSIZE; - } } # undef PERL_WORDCAST |