Function getProgramBinary

src/library/common/clkern.c:235–258

}

unsigned char
*getProgramBinary(cl_program program)
{
    unsigned char *binaries[MAX_OPENCL_DEVICES];
    unsigned char *bin = NULL;
    size_t size;
    int idx = 0;

    memset(binaries, 0, sizeof(binaries));
    size = getBinSizeAndIdx(program, &idx);
    bin = binaries[idx] = malloc(size);
    if (bin != NULL) {
        cl_int err;

        err = clGetProgramInfo(program, CL_PROGRAM_BINARIES, sizeof(binaries),
                               binaries, NULL);
        if (err != CL_SUCCESS) {
            free(bin);
            bin = NULL;
        }
    }

    return bin;
}