File: migration_test.cl

package info (click to toggle)
pocl 7.1-1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 29,768 kB
  • sloc: lisp: 151,669; ansic: 135,425; cpp: 65,801; python: 1,846; sh: 1,084; ruby: 255; pascal: 231; tcl: 180; makefile: 174; asm: 81; java: 72; xml: 49
file content (11 lines) | stat: -rw-r--r-- 383 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
 
kernel void
migration_test (global const float *in, global float *out, uint items,
                uint device_index)
{
  size_t i = get_global_id (0);
  const size_t offset = device_index * items;
  out[offset + i] += in[offset + i] * (device_index + 1);
  if (i == 0)
    printf ("\nDEV: %u OUT[0]: %f IN[0]: %f \n\n", device_index,
            out[offset + i], in[offset + i]);
}