In perl.git, the branch blead has been updated <https://perl5.git.perl.org/perl.git/commitdiff/4fa9266363598bc31684f549c2c8ce8c6664d137?hp=12c43b0a5b21dd9e8c391615febef3017ebb2c66>
- Log ----------------------------------------------------------------- commit 4fa9266363598bc31684f549c2c8ce8c6664d137 Author: Karl Williamson <[email protected]> Date: Fri Mar 15 11:11:11 2019 -0600 inline.h: Improve comment ----------------------------------------------------------------------- Summary of changes: inline.h | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/inline.h b/inline.h index 0a3c47ab39..654f801b75 100644 --- a/inline.h +++ b/inline.h @@ -549,8 +549,8 @@ S__variant_byte_number(PERL_UINTMAX_T word) * x..xx01..1 Subtract 1, turns all the trailing zeros into 1's and * the 1 just to their left into a 0; the remainder is * untouched - * 0..0011..1 The xor with x..xx10..0 clears that remainder, sets - * bottom to all 1 + * 0..0011..1 The xor with the original, x..xx10..0, clears that + * remainder, sets the bottom to all 1 * 0..0100..0 Add 1 to clear the word except for the bit in 's' * * Another method is to do 'word &= -word'; but it generates a compiler -- Perl5 Master Repository
