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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
|
/* { dg-do run } */
/* { dg-options "-O3" } */
#include "limits.h"
extern void abort (void);
#define N 16
#include "vect-mull.x"
#define SET_VEC(size, type, sign) \
void set_vector_##sign##size \
(pR##sign##INT##size b, \
pR##sign##INT##size c) \
{ \
int i; \
for (i=0; i<N; i++) \
{ \
b[i] = (type)((INT_MAX >> (32 - size)) - i); \
c[i] = (type)((INT_MAX >> (32 - size)) - i * 2); \
} \
}
#define CHECK_VEC(size, sign) void check_vector_##sign##size (pR##sign##INT##size a, \
pR##sign##INT##size b) \
{ \
int i; \
for (i=0; i<N; i++) \
if (a[i] != b[i]) \
abort (); \
}
SET_VEC (8, signed char, S)
SET_VEC (16, signed short, S)
SET_VEC (32, signed int, S)
SET_VEC (8, unsigned char, U)
SET_VEC (16, unsigned short, U)
SET_VEC (32, unsigned int, U)
DEF_MULL2 (DEF_MULLB)
DEF_MULL2 (DEF_MULLH)
DEF_MULL2 (DEF_MULLS)
CHECK_VEC (8, S)
CHECK_VEC (8, U)
CHECK_VEC (16, S)
CHECK_VEC (16, U)
CHECK_VEC (32, S)
CHECK_VEC (32, U)
CHECK_VEC (64, S)
CHECK_VEC (64, U)
int main (void)
{
#define DECL_VAR(name) signed char name##_S8[N]; \
signed short name##_S16[N]; \
signed int name##_S32[N]; \
unsigned char name##_U8[N]; \
unsigned short name##_U16[N]; \
unsigned int name##_U32[N];
DECL_VAR (output);
signed long long output_S64[N];
unsigned long long output_U64[N];
DECL_VAR (input1);
DECL_VAR (input2);
signed short expected_S16[] =
{ 16129, 15750, 15375, 15004, 14637, 14274, 13915, 13560,
13209, 12862, 12519, 12180, 11845, 11514, 11187, 10864 };
signed int expected_S32[] =
{ 1073676289, 1073577990, 1073479695, 1073381404, 1073283117,
1073184834, 1073086555, 1072988280, 1072890009, 1072791742,
1072693479, 1072595220, 1072496965, 1072398714, 1072300467,
1072202224 };
signed long long expected_S64[] =
{ 4611686014132420609LL, 4611686007689969670LL,
4611686001247518735LL, 4611685994805067804LL,
4611685988362616877LL, 4611685981920165954LL,
4611685975477715035LL, 4611685969035264120LL,
4611685962592813209LL, 4611685956150362302LL,
4611685949707911399LL, 4611685943265460500LL,
4611685936823009605LL, 4611685930380558714LL,
4611685923938107827LL, 4611685917495656944LL };
unsigned short expected_U16[] =
{ 16129, 15750, 15375, 15004, 14637, 14274, 13915, 13560,
13209, 12862, 12519, 12180, 11845, 11514, 11187, 10864 };
unsigned int expected_U32[] =
{ 1073676289, 1073577990, 1073479695, 1073381404, 1073283117,
1073184834, 1073086555, 1072988280, 1072890009, 1072791742,
1072693479, 1072595220, 1072496965, 1072398714, 1072300467,
1072202224 };
unsigned long long expected_U64[] =
{ 4611686014132420609ULL, 4611686007689969670ULL,
4611686001247518735ULL, 4611685994805067804ULL,
4611685988362616877ULL, 4611685981920165954ULL,
4611685975477715035ULL, 4611685969035264120ULL,
4611685962592813209ULL, 4611685956150362302ULL,
4611685949707911399ULL, 4611685943265460500ULL,
4611685936823009605ULL, 4611685930380558714ULL,
4611685923938107827ULL, 4611685917495656944ULL };
/* Set up input. */
set_vector_S8 (input1_S8, input2_S8);
set_vector_S16 (input1_S16, input2_S16);
set_vector_S32 (input1_S32, input2_S32);
set_vector_U8 (input1_U8, input2_U8);
set_vector_U16 (input1_U16, input2_U16);
set_vector_U32 (input1_U32, input2_U32);
/* Calculate actual results. */
widen_mult_Sb (output_S16, input1_S8, input2_S8);
widen_mult_Sh (output_S32, input1_S16, input2_S16);
widen_mult_Ss (output_S64, input1_S32, input2_S32);
widen_mult_Ub (output_U16, input1_U8, input2_U8);
widen_mult_Uh (output_U32, input1_U16, input2_U16);
widen_mult_Us (output_U64, input1_U32, input2_U32);
/* Check actual vs. expected. */
check_vector_S16 (expected_S16, output_S16);
check_vector_S32 (expected_S32, output_S32);
check_vector_S64 (expected_S64, output_S64);
check_vector_U16 (expected_U16, output_U16);
check_vector_U32 (expected_U32, output_U32);
check_vector_U64 (expected_U64, output_U64);
return 0;
}
|
