From b666fc37aa65e33c30e9714c88d87144c7da2c22 Mon Sep 17 00:00:00 2001
From: Tom Stellard <thomas.stellard@amd.com>
Date: Tue, 21 May 2013 08:50:49 -0700
Subject: Add clFinish() call to clSimpleEnqueueNDRangeKernel

---
 cl_simple.c | 7 +++++++
 1 file changed, 7 insertions(+)

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;
 }
 
-- 
cgit v1.2.3