Explorar o código

src/datawizard/copy_driver.c: release opencl event when copy is completed

Nathalie Furmento %!s(int64=9) %!d(string=hai) anos
pai
achega
1fb4a4761c
Modificáronse 1 ficheiros con 5 adicións e 0 borrados
  1. 5 0
      src/datawizard/copy_driver.c

+ 5 - 0
src/datawizard/copy_driver.c

@@ -764,6 +764,11 @@ unsigned _starpu_driver_test_request_completion(struct _starpu_async_channel *as
 			STARPU_OPENCL_REPORT_ERROR(err);
 		if (event_status < 0)
 			STARPU_OPENCL_REPORT_ERROR(event_status);
+		if (event_status == CL_COMPLETE)
+		{
+			err = clReleaseEvent(opencl_event);
+			if (STARPU_UNLIKELY(err != CL_SUCCESS)) STARPU_OPENCL_REPORT_ERROR(err);
+		}
 		success = (event_status == CL_COMPLETE);
 		break;
 	}