sig
  type document
  type t = CL_DomDocument.document CL_DomNode.t
  external init : unit -> CL_DomDocument.t = "caml_CL_DomDocument_init"
  external delete : CL_DomDocument.t -> unit = "caml_CL_DomDocument_delete"
  external from_file : CL_File.t -> CL_DomDocument.t
    = "caml_CL_DomDocument_init_from_file"
  external get_document_element : CL_DomDocument.t -> CL_DomElement.t
    = "caml_CL_DomDocument_get_document_element"
end