Function fullKernelSize

src/library/common/kern_cache.c:415–433

}

size_t
fullKernelSize(Kernel *kern)
{
    size_t allSizes[MAX_OPENCL_DEVICES], size = 0;
    size_t i, retSize;

    clGetProgramInfo(kern->program, CL_PROGRAM_BINARY_SIZES,
                     sizeof(allSizes), &allSizes, &retSize);
    retSize /= sizeof(size);
    for (i = 0; i < retSize; i++) {
        size += allSizes[i];
    }

    if (!kern->noSource) {
        clGetProgramInfo(kern->program, CL_PROGRAM_SOURCE, 0, NULL, &retSize);
    }

    return (size + retSize + sizeof(Kernel) + kern->extraSize);
}

#if defined(TRACE_MALLOC)