Function putKernel

src/library/common/kern_cache.c:206–235

}

void
putKernel(struct KernelCache *kcache, Kernel *kern)
{
    KernelNode *knode;
    unsigned long refcnt;

    if (kern == NULL) {
        return;
    }

    knode = container_of(kern, kern, KernelNode);
    assert(knode->magic == KNODE_MAGIC);

    if (kcache) {
        KCACHE_LOCK(kcache);
    }
    refcnt = --knode->refcnt;
    if (kcache) {
        KCACHE_UNLOCK(kcache);
    }

    if (!refcnt) {
        if (kern->dtor) {
            kern->dtor(kern);
        }
        clReleaseProgram(kern->program);
        clReleaseContext(knode->key.context);
        free(knode);
    }
}

struct KernelCache
*createKernelCache(