Add clFinish() call to clSimpleEnqueueNDRangeKernel

1 files changed, 7 insertions, 0 deletions

diff --git a/cl_simple.c b/cl_simple.c
index 0b37d52..1dc565e 100644
--- a/cl_simple.c
+++ b/cl_simple.c
@@ -123,6 +123,13 @@ unsigned clSimpleEnqueueNDRangeKernel(cl_command_queue command_queue,
       return 0;
    }
 
+   error = clFinish(command_queue);
+
+   if (error != CL_SUCCESS) {
+      fprintf(stderr, "clFinish() failed: %s\n", clUtilErrorString(error));
+      return 0;
+   }
+
    return 1;
 }