sig
  type t
  external init : unit -> CL_DataBuffer.t = "caml_CL_DataBuffer_init"
  external delete : CL_DataBuffer.t -> unit = "caml_CL_DataBuffer_delete"
  external of_string : string -> CL_DataBuffer.t
    = "caml_CL_DataBuffer_of_string"
  external copy : CL_DataBuffer.t -> CL_DataBuffer.t
    = "caml_CL_DataBuffer_copy"
  external get_size : CL_DataBuffer.t -> int = "caml_CL_DataBuffer_get_size"
  external get_capacity : CL_DataBuffer.t -> int
    = "caml_CL_DataBuffer_get_capacity"
  external set_size : CL_DataBuffer.t -> int -> unit
    = "caml_CL_DataBuffer_set_size"
  external set_capacity : CL_DataBuffer.t -> int -> unit
    = "caml_CL_DataBuffer_set_capacity"
  external get : CL_DataBuffer.t -> int -> char = "caml_CL_DataBuffer_get_i"
  external set : CL_DataBuffer.t -> int -> char -> unit
    = "caml_CL_DataBuffer_set_i"
end