summaryrefslogtreecommitdiff
path: root/inline.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-05-26 09:37:37 -0600
committerKarl Williamson <khw@cpan.org>2021-05-28 15:23:57 -0600
commit1c91fe6b7a8577b2964f94b51fd0c78de5668381 (patch)
tree5322132951d6f3e89a701504ff64165598de4532 /inline.h
parent874c6b29fbee8c02f751729bfcff6ed795a8ab81 (diff)
downloadperl-1c91fe6b7a8577b2964f94b51fd0c78de5668381.tar.gz
inline.h: Clarify comment
Diffstat (limited to 'inline.h')
-rw-r--r--inline.h3
1 files changed, 2 insertions, 1 deletions
diff --git a/inline.h b/inline.h
index 8ec66b2290..045f880666 100644
--- a/inline.h
+++ b/inline.h
@@ -660,7 +660,8 @@ Perl_variant_byte_number(PERL_UINTMAX_T word)
| (55 << 8) | (63 << 0));
word >>= PERL_WORDSIZE * 7; /* >> by either 56 or 24 */
- /* Here, word contains the position 7..63 of that bit. Convert to 0..7 */
+ /* Here, word contains the position 7,15,23,...,63 of that bit. Convert to
+ * 0..7 */
word = ((word + 1) >> 3) - 1;
# if BYTEORDER == 0x4321 || BYTEORDER == 0x87654321