sig
  type 'a t
  external init : unit -> 'a CL_DomNode.t = "caml_CL_DomNode_init"
  external delete : 'a CL_DomNode.t -> unit = "caml_CL_DomNode_delete"
  external copy : 'a CL_DomNode.t -> 'a CL_DomNode.t = "caml_CL_DomNode_copy"
  external get_first_child : 'a CL_DomNode.t -> 'a CL_DomNode.t
    = "caml_CL_DomNode_get_first_child"
  external get_last_child : 'a CL_DomNode.t -> 'a CL_DomNode.t
    = "caml_CL_DomNode_get_last_child"
  external get_next_sibling : 'a CL_DomNode.t -> 'a CL_DomNode.t
    = "caml_CL_DomNode_get_next_sibling"
  external get_previous_sibling : 'a CL_DomNode.t -> 'a CL_DomNode.t
    = "caml_CL_DomNode_get_previous_sibling"
  external get_parent_node : 'a CL_DomNode.t -> 'a CL_DomNode.t
    = "caml_CL_DomNode_get_parent_node"
  external get_node_name : 'a CL_DomNode.t -> string
    = "caml_CL_DomNode_get_node_name"
  external get_node_value : 'a CL_DomNode.t -> string
    = "caml_CL_DomNode_get_node_value"
  external get_attributes : 'a CL_DomNode.t -> (string * string) list
    = "caml_CL_DomNode_get_attributes"
  module Exceptionless :
    sig
      val get_first_child : 'a CL_DomNode.t -> 'a CL_DomNode.t option
      val get_last_child : 'a CL_DomNode.t -> 'a CL_DomNode.t option
      val get_next_sibling : 'a CL_DomNode.t -> 'a CL_DomNode.t option
      val get_previous_sibling : 'a CL_DomNode.t -> 'a CL_DomNode.t option
      val get_parent_node : 'a CL_DomNode.t -> 'a CL_DomNode.t option
    end
  external is_element : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_element" [@@noalloc]
  external is_attr : 'a CL_DomNode.t -> bool = "caml_CL_DomNode_is_attr"
    [@@noalloc]
  external is_text : 'a CL_DomNode.t -> bool = "caml_CL_DomNode_is_text"
    [@@noalloc]
  external is_cdata_section : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_cdata_section" [@@noalloc]
  external is_entity_reference : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_entity_reference" [@@noalloc]
  external is_entity : 'a CL_DomNode.t -> bool = "caml_CL_DomNode_is_entity"
    [@@noalloc]
  external is_processing_instruction : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_processing_instruction" [@@noalloc]
  external is_comment : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_comment" [@@noalloc]
  external is_document : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_document" [@@noalloc]
  external is_document_type : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_document_type" [@@noalloc]
  external is_document_fragment : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_document_fragment" [@@noalloc]
  external is_notation : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_is_notation" [@@noalloc]
  external has_attributes : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_has_attributes" [@@noalloc]
  external has_child_nodes : 'a CL_DomNode.t -> bool
    = "caml_CL_DomNode_has_child_nodes" [@@noalloc]
end