1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
|
/* { dg-do run } */
/* { dg-options "-O3 -mpower8-vector -Wno-psabi" } */
/* { dg-require-effective-target lp64 } */
/* { dg-require-effective-target p8vector_hw } */
#ifndef CHECK_H
#define CHECK_H "sse2-check.h"
#endif
#include CHECK_H
#ifndef TEST
#define TEST sse2_test_psllq_1
#endif
#include <emmintrin.h>
#ifdef _ARCH_PWR8
#define TEST_FUNC(id, N) \
static __m128i \
__attribute__((noinline, unused)) \
test##id (__m128i s1) \
{ \
return _mm_slli_epi64 (s1, N); \
}
TEST_FUNC(0, 0)
TEST_FUNC(15, 15)
TEST_FUNC(16, 16)
TEST_FUNC(31, 31)
TEST_FUNC(63, 63)
TEST_FUNC(neg1, -1)
TEST_FUNC(neg16, -16)
TEST_FUNC(neg32, -32)
TEST_FUNC(neg64, -64)
TEST_FUNC(neg128, -128)
#endif
#define TEST_CODE(id, N) \
{ \
union128i_q u, s; \
long long e[2] = {0}; \
int i; \
s.x = _mm_set_epi64x (-1, 0xf); \
u.x = test##id (s.x); \
if (N >= 0 && N < 64) \
for (i = 0; i < 2; i++) \
e[i] = s.a[i] << (N * (N >= 0)); \
if (check_union128i_q (u, e)) \
abort (); \
}
static void
TEST (void)
{
#ifdef _ARCH_PWR8
TEST_CODE(0, 0);
TEST_CODE(15, 15);
TEST_CODE(16, 16);
TEST_CODE(31, 31);
TEST_CODE(63, 63);
TEST_CODE(neg1, -1);
TEST_CODE(neg16, -16);
TEST_CODE(neg32, -32);
TEST_CODE(neg64, -64);
TEST_CODE(neg128, -128);
#endif
}
|
