my_swap(): Save '&' instrs by casting to U8

Perl · Jul 24, 2021 · dfe5b3b · dfe5b3b
1 parent 31493b3
commit dfe5b3b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/perl.h b/perl.h
@@ -4178,13 +4178,13 @@ struct ptr_tbl {
 
 PERL_STATIC_INLINE U32
 my_swap32(const U32 x) {
-    return ((x & 0xFF) << 24) | ((x >> 24) & 0xFF)
+    return ((U8) (x) << 24) | ((U8) (x >> 24))
         | ((x & 0x0000FF00) << 8) | ((x & 0x00FF0000) >> 8);
 }
 
 PERL_STATIC_INLINE U16
 my_swap16(const U16 x) {
-    return ((x & 0xFF) << 8) | ((x >> 8) & 0xFF);
+    return (((U8) x) << 8) | ((U8) (x >> 8));
 }
 
 #    define htonl(x)    my_swap32(x)