diff options
author | Karl Williamson <khw@cpan.org> | 2019-02-01 11:41:14 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-02-04 21:00:50 -0700 |
commit | 02601e33951e916a19e46272146a0b59862aaff5 (patch) | |
tree | 1d394feead99773fdd07af9b5160bdee20c7f9ad /pp.c | |
parent | 2f8f985a27faf25c5a535cbe67d098690668c0f9 (diff) | |
download | perl-02601e33951e916a19e46272146a0b59862aaff5.tar.gz |
pp.c: Add branch prediction hint
This conditional is very rarely true
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -4039,7 +4039,7 @@ PP(pp_uc) STRLEN u; STRLEN ulen; UV uv; - if (in_iota_subscript && ! _is_utf8_mark(s)) { + if (UNLIKELY(in_iota_subscript) && ! _is_utf8_mark(s)) { /* A non-mark. Time to output the iota subscript */ *d++ = UTF8_TWO_BYTE_HI(GREEK_CAPITAL_LETTER_IOTA); |