13 lines
282 B
Common Lisp
13 lines
282 B
Common Lisp
|
|
|
|
|
|
// Это подпрограмма которую вызывает из "SimpleAddition.pas" 10 раз параллельно
|
|
__kernel void TEST(__global int* message)
|
|
{
|
|
int gid = get_global_id(0); // номер текущего вызова TEST
|
|
|
|
message[gid] += gid;
|
|
}
|
|
|
|
|