sig
  module Make :
    functor (XML : XML_sigs.Iterable->
      sig
        val amap :
          (XML.ename -> XML.attrib list -> XML.attrib list) ->
          XML.elt -> XML.elt
        val amap1 :
          (XML.ename -> XML.attrib list -> XML.attrib list) ->
          XML.elt -> XML.elt
        val rm_attrib :
          (XML.aname -> bool) -> XML.attrib list -> XML.attrib list
        val rm_attrib_from_list :
          (XML.aname -> bool) ->
          (string -> bool) -> XML.attrib list -> XML.attrib list
        val map_int_attrib :
          (XML.aname -> bool) ->
          (int -> int) -> XML.attrib list -> XML.attrib list
        val map_string_attrib :
          (XML.aname -> bool) ->
          (string -> string) -> XML.attrib list -> XML.attrib list
        val map_string_attrib_in_list :
          (XML.aname -> bool) ->
          (string -> string) -> XML.attrib list -> XML.attrib list
        val add_int_attrib :
          XML.aname -> int -> XML.attrib list -> XML.attrib list
        val add_string_attrib :
          XML.aname -> string -> XML.attrib list -> XML.attrib list
        val add_comma_sep_attrib :
          XML.aname -> string -> XML.attrib list -> XML.attrib list
        val add_space_sep_attrib :
          XML.aname -> string -> XML.attrib list -> XML.attrib list
        val fold :
          (unit -> 'a) ->
          (string -> 'a) ->
          (string -> 'a) ->
          (string -> 'a) ->
          (string -> 'a) ->
          (XML.ename -> XML.attrib list -> 'a) ->
          (XML.ename -> XML.attrib list -> 'a list -> 'a) -> XML.elt -> 'a
        val all_entities : XML.elt -> string list
        val translate :
          (XML.ename -> XML.attrib list -> XML.elt) ->
          (XML.ename -> XML.attrib list -> XML.elt list -> XML.elt) ->
          ('-> XML.ename -> XML.attrib list -> XML.elt list) ->
          ('-> XML.ename -> XML.attrib list -> XML.elt list -> XML.elt list) ->
          (XML.ename -> XML.attrib list -> '-> 'a) ->
          '-> XML.elt -> XML.elt
      end
end