sig
  type t
  type kind = RGBA | Index
  type uint = int
  external default : unit -> CL_PixelFormat.t = "caml_CL_PixelFormat_default"
  external delete : CL_PixelFormat.t -> unit = "caml_CL_PixelFormat_delete"
  external init :
    depth:int ->
    red_mask:CL_PixelFormat.uint ->
    green_mask:CL_PixelFormat.uint ->
    blue_mask:CL_PixelFormat.uint ->
    alpha_mask:CL_PixelFormat.uint ->
    use_colorkey:bool ->
    colorkey:CL_PixelFormat.uint ->
    kind:CL_PixelFormat.kind -> unit -> CL_PixelFormat.t
    = "caml_CL_PixelFormat_init_bc" "caml_CL_PixelFormat_init"
end