Skip to content

Commit

Permalink
inline.h: Remove relict comments
Browse files Browse the repository at this point in the history
We changed the bit ops before 5.30 to work sanely on UTF-8 encoded
strings.
  • Loading branch information
khwilliamson committed Oct 1, 2024
1 parent 24a0fdd commit 228adb8
Showing 1 changed file with 0 additions and 10 deletions.
10 changes: 0 additions & 10 deletions inline.h
Original file line number Diff line number Diff line change
Expand Up @@ -2672,11 +2672,6 @@ PERL_STATIC_INLINE U8 *
Perl_utf8_hop_forward(const U8 *s, SSize_t off, const U8 *end)
{
PERL_ARGS_ASSERT_UTF8_HOP_FORWARD;

/* Note: cannot use UTF8_IS_...() too eagerly here since e.g
* the bitops (especially ~) can create illegal UTF-8.
* In other words: in Perl UTF-8 is not just for Unicode. */

assert(off >= 0);

if (UNLIKELY(s >= end)) {
Expand Down Expand Up @@ -2736,11 +2731,6 @@ PERL_STATIC_INLINE U8 *
Perl_utf8_hop_back(const U8 *s, SSize_t off, const U8 *start)
{
PERL_ARGS_ASSERT_UTF8_HOP_BACK;

/* Note: cannot use UTF8_IS_...() too eagerly here since e.g
* the bitops (especially ~) can create illegal UTF-8.
* In other words: in Perl UTF-8 is not just for Unicode. */

assert(start <= s);
assert(off <= 0);

Expand Down

0 comments on commit 228adb8

Please sign in to comment.