소스 검색

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

Nathalie Furmento 9 년 전
부모
커밋
1fb4a4761c
1개의 변경된 파일5개의 추가작업 그리고 0개의 파일을 삭제
  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;
 	}