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
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
|
/*!
[config]
name: Ulong arithmetic
clc_version_min: 10
dimensions: 1
global_size: 1 0 0
## Addition ##
[test]
name: pos+pos
kernel_name: add
arg_in: 1 ulong 1
arg_in: 2 ulong 2
arg_out: 0 buffer ulong[1] 3
[test]
name: pos+0
kernel_name: add
arg_in: 1 ulong 34
arg_in: 2 ulong 0
arg_out: 0 buffer ulong[1] 34
## Subtraction ##
[test]
name: pos-pos
kernel_name: sub
arg_in: 1 ulong 5
arg_in: 2 ulong 2
arg_out: 0 buffer ulong[1] 3
[test]
name: pos-0
kernel_name: sub
arg_in: 1 ulong 77
arg_in: 2 ulong 0
arg_out: 0 buffer ulong[1] 77
## Multiplication ##
[test]
name: pos*pos
kernel_name: mul
arg_in: 1 ulong 3
arg_in: 2 ulong 4
arg_out: 0 buffer ulong[1] 12
[test]
name: 0*pos
kernel_name: mul
arg_in: 1 ulong 0
arg_in: 2 ulong 3
arg_out: 0 buffer ulong[1] 0
## Division ##
[test]
name: pos div pos
kernel_name: div
arg_in: 1 ulong 8
arg_in: 2 ulong 4
arg_out: 0 buffer ulong[1] 2
[test]
name: pos div pos (remainder)
kernel_name: div
arg_in: 1 ulong 7
arg_in: 2 ulong 4
arg_out: 0 buffer ulong[1] 1
[test]
name: 0 div num
kernel_name: div
arg_in: 1 ulong 0
arg_in: 2 ulong 77
arg_out: 0 buffer ulong[1] 0
## Modulo ##
[test]
name: pos%pos=0
kernel_name: mod
arg_in: 1 ulong 8
arg_in: 2 ulong 4
arg_out: 0 buffer ulong[1] 0
[test]
name: pos%pos=pos
kernel_name: mod
arg_in: 1 ulong 8
arg_in: 2 ulong 5
arg_out: 0 buffer ulong[1] 3
[test]
name: small_pos%big_pos
kernel_name: mod
arg_in: 1 ulong 7
arg_in: 2 ulong 3200345334351
arg_out: 0 buffer ulong[1] 7
[test]
name: max_ulong%num
kernel_name: mod
arg_in: 1 ulong 18446744073709551615
arg_in: 2 ulong 7674334534554
arg_out: 0 buffer ulong[1] 7547678378247
[test]
name: min_ulong%num
kernel_name: mod
arg_in: 1 ulong 0
arg_in: 2 ulong 342346853345563
arg_out: 0 buffer ulong[1] 0
## Unary plus ##
[test]
name: +pos
kernel_name: plus
arg_in: 1 ulong 34
arg_out: 0 buffer ulong[1] 34
## Increment ##
[test]
name: num++
kernel_name: postinc
arg_in: 1 ulong 34
arg_out: 0 buffer ulong[1] 34
[test]
name: ++num
kernel_name: preinc
arg_in: 1 ulong 22
arg_out: 0 buffer ulong[1] 23
## Decrement ##
[test]
name: num--
kernel_name: postdec
arg_in: 1 ulong 55
arg_out: 0 buffer ulong[1] 55
[test]
name: --num
kernel_name: predec
arg_in: 1 ulong 22
arg_out: 0 buffer ulong[1] 21
!*/
kernel void add(global ulong* out, ulong a, ulong b) {
out[0] = a + b;
}
kernel void sub(global ulong* out, ulong a, ulong b) {
out[0] = a - b;
}
kernel void mul(global ulong* out, ulong a, ulong b) {
out[0] = a * b;
}
kernel void div(global ulong* out, ulong a, ulong b) {
out[0] = a / b;
}
kernel void mod(global ulong* out, ulong a, ulong b) {
out[0] = a % b;
}
kernel void plus(global ulong* out, ulong in) {
out[0] = +in;
}
kernel void postinc(global ulong* out, ulong in) {
out[0] = in++;
}
kernel void preinc(global ulong* out, ulong in) {
out[0] = ++in;
}
kernel void postdec(global ulong* out, ulong in) {
out[0] = in--;
}
kernel void predec(global ulong* out, ulong in) {
out[0] = --in;
}
|
