This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
is_utf8_invariant_string(): small speed optimization
authorKarl Williamson <khw@cpan.org>
Tue, 12 Dec 2017 01:17:29 +0000 (18:17 -0700)
committerKarl Williamson <khw@cpan.org>
Tue, 12 Dec 2017 02:08:38 +0000 (19:08 -0700)
commit099e59a45fd0c4d6657bf384e0539691eb7b1f24
tree10a2d3047778465eecd2a6f02bf06bef2ec1f410
parent16ef5c6e5c4a7d414ca7ef46cff9f8015fcd9079
is_utf8_invariant_string(): small speed optimization

This adds a few shifing, masking, and integer arithmetic operations to a
conditional which in return makes sure that one branch is taken only
when it is going to do some good, avoiding a conditional in it.
ext/XS-APItest/APItest.xs
inline.h