Source position: cl.pp line 650
function clCreateContext(
properties: Pcl_context_properties;
num_devices: cl_uint;
devices: Pcl_device_id;
notify: TContextNotify;
user_data: Pointer;
var errcode_ret: cl_int
):cl_context;