在OpenCL中有没有像cuda的时间函数一样计算内核时间的方法

cl_event event;
cl_ulong start_time, end_time;

// 创建事件对象
event = clCreateUserEvent(context, NULL);

// 将事件对象与内核关联
clSetUserEventStatus(event, CL_SUBMITTED);

// 在内核执行之前插入事件
clEnqueueMarkerWithWaitList(queue, 0, NULL, &event);

// 执行内核
clEnqueueNDRangeKernel(queue, kernel, 1, NULL, &global_size, &local_size, 1, &event, NULL);

// 在内核执行之后插入事件
clEnqueueMarkerWithWaitList(queue, 0, NULL, &event);

// 等待事件完成
clWaitForEvents(1, &event);

// 获取内核执行时间
clGetEventProfilingInfo(event, CL_PROFILING_COMMAND_START, sizeof(cl_ulong), &start_time, NULL);
clGetEventProfilingInfo(event, CL_PROFILING_COMMAND_END, sizeof(cl_ulong), &end_time, NULL);

// 计算内核执行时间
cl_ulong kernel_time = end_time - start_time;

// 打印内核执行时间
printf("Kernel execution time: %lu ns\n", kernel_time);

// 释放事件对象
clReleaseEvent(event);