diff options
author | Tom Stellard <thomas.stellard@amd.com> | 2013-05-21 13:05:55 -0700 |
---|---|---|
committer | Tom Stellard <thomas.stellard@amd.com> | 2013-05-21 13:05:55 -0700 |
commit | a1b214a70f34978196e22a876f1c053ae44a3d30 (patch) | |
tree | 6323a125de83ed4cdc89530004ef9b555b83a3d0 | |
parent | b666fc37aa65e33c30e9714c88d87144c7da2c22 (diff) |
Make sure all the programs call clFinish()
-rw-r--r-- | get_global_id_2d.c | 12 | ||||
-rw-r--r-- | math-int.c | 12 | ||||
-rw-r--r-- | memset.c | 12 |
3 files changed, 11 insertions, 25 deletions
diff --git a/get_global_id_2d.c b/get_global_id_2d.c index 04aa309..47681a3 100644 --- a/get_global_id_2d.c +++ b/get_global_id_2d.c @@ -36,15 +36,13 @@ int main (int argc, char ** argv) return EXIT_FAILURE; } - error = clEnqueueNDRangeKernel(context.command_queue, + if (!clSimpleEnqueueNDRangeKernel(context.command_queue, context.kernel, - 2, /* dimensions */ - NULL, + 2, global_work_size, - local_work_size, - 0, NULL, NULL); - - assert(error == CL_SUCCESS); + local_work_size)) { + return EXIT_FAILURE; + } error = clEnqueueReadBuffer(context.command_queue, out_buffer, @@ -87,19 +87,11 @@ int main(int argc, char ** argv) return EXIT_FAILURE; } - error = clEnqueueNDRangeKernel(command_queue, + if(!clSimpleEnqueueNDRangeKernel(command_queue, kernel, 1, /* Number of dimensions */ - NULL, /* Global work offset */ &global_work_size, - &global_work_size, /* local work size */ - 0, /* Events in wait list */ - NULL, /* Wait list */ - NULL); /* Event object for this event */ - - if (error != CL_SUCCESS) { - fprintf(stderr, "clEnqueueNDRangeKernel() failed: %s\n", - clUtilErrorString(error)); + &global_work_size)) { /* local work size */ return EXIT_FAILURE; } @@ -64,15 +64,11 @@ int main (int argc, char ** argv) return EXIT_FAILURE; } - error = clEnqueueNDRangeKernel(context.command_queue, + if (!clSimpleEnqueueNDRangeKernel(context.command_queue, context.kernel, - 1, NULL, - &global_work_size, &local_work_size, - 0, NULL, NULL); - - if (error != CL_SUCCESS) { - fprintf(stderr, "clEnqueueNDRangeKernel() failed: %s\n", - clUtilErrorString(error)); + 1, + &global_work_size, &local_work_size)) { + return EXIT_FAILURE; } if (!clSimpleReadOutput(&context, out_data, out_size)) { |