1 /* { dg-do compile } */
2 /* { dg-require-effective-target bswap } */
3 /* { dg-require-effective-target stdint_types } */
4 /* { dg-options "-O2 -fdump-tree-optimized" } */
5 /* { dg-additional-options "-mzarch" { target s390*-*-* } } */
8 #define __const_swab64(x) ((uint64_t)( \
9 (((uint64_t)(x) & (uint64_t)0x00000000000000ffULL) << 56) | \
10 (((uint64_t)(x) & (uint64_t)0x000000000000ff00ULL) << 40) | \
11 (((uint64_t)(x) & (uint64_t)0x0000000000ff0000ULL) << 24) | \
12 (((uint64_t)(x) & (uint64_t)0x00000000ff000000ULL) << 8) | \
13 (((uint64_t)(x) & (uint64_t)0x000000ff00000000ULL) >> 8) | \
14 (((uint64_t)(x) & (uint64_t)0x0000ff0000000000ULL) >> 24) | \
15 (((uint64_t)(x) & (uint64_t)0x00ff000000000000ULL) >> 40) | \
16 (((uint64_t)(x) & (uint64_t)0xff00000000000000ULL) >> 56)))
19 /* This byte swap implementation is used by the Linux kernel and the
25 return __const_swab64 (in
);
28 /* This variant is currently used by libgcc. The difference is that
29 the bswap source and destination have a signed integer type which
30 requires a slightly higher search depth in order to dive through
33 typedef int DItype
__attribute__ ((mode (DI
)));
37 return ((((u
) & 0xff00000000000000ull
) >> 56)
38 | (((u
) & 0x00ff000000000000ull
) >> 40)
39 | (((u
) & 0x0000ff0000000000ull
) >> 24)
40 | (((u
) & 0x000000ff00000000ull
) >> 8)
41 | (((u
) & 0x00000000ff000000ull
) << 8)
42 | (((u
) & 0x0000000000ff0000ull
) << 24)
43 | (((u
) & 0x000000000000ff00ull
) << 40)
44 | (((u
) & 0x00000000000000ffull
) << 56));
47 /* The OpenSSL variant. */
53 uint32_t b
= (uint32_t) x
;
54 return ((uint64_t) ((((((b
)) >> (8)) | (((b
)) << (32 - (8)))) & 0xff00ff00L
)
55 | (((((b
)) << (8)) | (((b
)) >> (32 - (8)))) & 0x00ff00ffL
)) << 32)
56 | (uint64_t) ((((((a
)) >> (8)) | (((a
)) << (32 - (8)))) & 0xff00ff00L
)
57 | (((((a
)) << (8)) | (((a
)) >> (32 - (8)))) & 0x00ff00ffL
));
61 /* { dg-final { scan-tree-dump-times "= __builtin_bswap64 \\\(" 3 "optimized" } } */