sig
  type t
  external init : string -> CL_String16.t = "caml_CL_String16_init"
  external delete : CL_String16.t -> unit = "caml_CL_String16_delete"
  external clear : CL_String16.t -> unit = "caml_CL_String16_clear"
  external append : CL_String16.t -> string -> unit
    = "caml_CL_String16_append"
end