In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/2f49491f5d1c7c1014a5af26c13a743812995ee1?hp=0d372decaee46c672b06bb7d800aa24e7cb3c87e>

- Log -----------------------------------------------------------------
commit 2f49491f5d1c7c1014a5af26c13a743812995ee1
Author: Karl Williamson <k...@cpan.org>
Date:   Wed Apr 4 09:24:02 2018 -0600

    Revert "inline.h: Silence compiler warning"
    
    This reverts commit 0cb291171cc75e1aed1c415a7178c1ea9441259b which was
    causing real failures.  Since I don't have access to this platform, I
    think the way to go is to get the OP to work with me to come up with a
    solution before committing to blead.  [perl #13307]

-----------------------------------------------------------------------

Summary of changes:
 inline.h | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/inline.h b/inline.h
index fc9e13e5d3..8c20e7583a 100644
--- a/inline.h
+++ b/inline.h
@@ -641,8 +641,7 @@ S_variant_under_utf8_count(const U8* const s, const U8* 
const e)
         /* Process per-word as long as we have at least a full word left */
         do {    /* Commit 03c1e4ab1d6ee9062fb3f94b0ba31db6698724b1 contains an
                    explanation of how this works */
-            count += (Size_t)
-                    ((((* (PERL_UINTMAX_T *) x) & PERL_VARIANTS_WORD_MASK) >> 
7)
+            count += ((((* (PERL_UINTMAX_T *) x) & PERL_VARIANTS_WORD_MASK) >> 
7)
                       * PERL_COUNT_MULTIPLIER)
                     >> ((PERL_WORDSIZE - 1) * CHARBITS);
             x += PERL_WORDSIZE;

-- 
Perl5 Master Repository

Reply via email to