mirror of
https://github.com/compiler-explorer/compiler-explorer.git
synced 2025-12-27 09:23:52 -05:00
7 lines
226 B
Common Lisp
7 lines
226 B
Common Lisp
kernel void do_add_sub(global short4 *add_out, global short4 *sub_out,
|
|
global short4 *x, global short4 *y)
|
|
{
|
|
size_t g = get_global_id(0);
|
|
add_out[g] = x[g] + y[g];
|
|
sub_out[g] = x[g] - y[g];
|
|
} |