cl_int pocl_create_event (cl_event *event, cl_context context, cl_command_queue command_queue, cl_command_type command_type) { if (context == NULL || !(context->valid)) return CL_INVALID_CONTEXT; if (event != NULL) { *event = pocl_mem_manager_new_event (); if (event == NULL) return CL_OUT_OF_HOST_MEMORY; (*event)->context = context; POname(clRetainContext) (context); (*event)->queue = command_queue; /* user events have a NULL command queue, don't retain it */ if (command_queue) POname(clRetainCommandQueue) (command_queue); (*event)->command_type = command_type; (*event)->callback_list = NULL; (*event)->implicit_event = 0; (*event)->next = NULL; } return CL_SUCCESS; }
cl_int pocl_create_event (cl_event *event, cl_command_queue command_queue, cl_command_type command_type) { if (event != NULL) { *event = pocl_mem_manager_new_event (); if (event == NULL) return CL_OUT_OF_HOST_MEMORY; (*event)->queue = command_queue; POname(clRetainCommandQueue) (command_queue); (*event)->command_type = command_type; (*event)->callback_list = NULL; (*event)->implicit_event = 0; (*event)->next = NULL; } return CL_SUCCESS; }