|
@@ -201,9 +201,10 @@ cl_int starpu_opencl_allocate_memory(cl_mem *mem, size_t size, cl_mem_flags flag
|
|
|
* want to know this __now__, so we just perform a dummy copy.
|
|
|
*/
|
|
|
char dummy = 0;
|
|
|
- err = clEnqueueWriteBuffer(queues[worker->devid], memory, CL_TRUE,
|
|
|
- 0, sizeof(dummy), &dummy,
|
|
|
- 0, NULL, NULL);
|
|
|
+ err = clEnqueueWriteBuffer(queues[worker->devid], memory, CL_FALSE,
|
|
|
+ 0, sizeof(dummy), &dummy,
|
|
|
+ 0, NULL, NULL);
|
|
|
+ clFinish(queues[worker->devid]);
|
|
|
if (err == CL_MEM_OBJECT_ALLOCATION_FAILURE)
|
|
|
return err;
|
|
|
if (err != CL_SUCCESS)
|