Advertisement
rasoran

Untitled

Oct 27th, 2014
175
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 1.46 KB | None | 0 0
  1.   for (int32_t k = 0; k < 32; k++) {
  2.     rsort_scan(cv.commands, cv.context,
  3.         kernel_map[scan_name_str], kernel_map[update_name_str],
  4.         g_in, g_zeros, 0, k, n);
  5.     rsort_scan(cv.commands, cv.context,
  6.         kernel_map[scan_name_str], kernel_map[update_name_str],
  7.         g_in, g_ones, 1, k, n);
  8.  
  9.     err = clSetKernelArg(kernel_map[reassemble_name_str], 0, sizeof(cl_mem), &g_in);
  10.     CHK_ERR(err);
  11.     err = clSetKernelArg(kernel_map[reassemble_name_str], 1, sizeof(cl_mem), &g_out);
  12.     CHK_ERR(err);
  13.     err = clSetKernelArg(kernel_map[reassemble_name_str], 2, sizeof(cl_mem), &g_zeros);
  14.     CHK_ERR(err);
  15.     err = clSetKernelArg(kernel_map[reassemble_name_str], 3, sizeof(cl_mem), &g_ones);
  16.     CHK_ERR(err);
  17.     err = clSetKernelArg(kernel_map[reassemble_name_str], 4, sizeof(int), &k);
  18.     CHK_ERR(err);
  19.     err = clSetKernelArg(kernel_map[reassemble_name_str], 5, sizeof(int), &n);
  20.     CHK_ERR(err);
  21.  
  22.     err = clEnqueueNDRangeKernel(cv.commands,
  23.                      kernel_map[reassemble_name_str],
  24.                      1,//work_dim,
  25.                      NULL, //global_work_offset
  26.                      global_work_size, //global_work_size
  27.                      local_work_size, //local_work_size
  28.                      0, //num_events_in_wait_list
  29.                      NULL, //event_wait_list
  30.                      NULL //
  31.                      );
  32.     CHK_ERR(err);
  33.  
  34.     cl_mem g_tPtr = g_in;
  35.     g_in = g_out;
  36.     g_out = g_tPtr;
  37.   }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement