exception Marshal_error of string * Xml_datatype.xml
val massoc : string -> (string * string) list -> stringval constructor : string -> string -> Xml_datatype.xml list -> Xml_datatype.xmlval do_match : string -> (string -> Xml_datatype.xml list -> 'b) -> Xml_datatype.xml -> 'bval singleton : 'a list -> 'aval empty : 'a list -> unitval raw_string : Xml_datatype.xml list -> stringval of_unit : unit -> Xml_datatype.xmlval to_unit : Xml_datatype.xml -> unitval of_bool : bool -> Xml_datatype.xmlval to_bool : Xml_datatype.xml -> boolval of_list : ('a -> Xml_datatype.xml) -> 'a list -> Xml_datatype.xmlval to_list : (Xml_datatype.xml -> 'a) -> Xml_datatype.xml -> 'a listval of_option : ('a -> Xml_datatype.xml) -> 'a option -> Xml_datatype.xmlval to_option : (Xml_datatype.xml -> 'a) -> Xml_datatype.xml -> 'a optionval of_string : string -> Xml_datatype.xmlval to_string : Xml_datatype.xml -> stringval of_int : int -> Xml_datatype.xmlval to_int : Xml_datatype.xml -> intval of_pair : ('a -> Xml_datatype.xml) -> ('b -> Xml_datatype.xml) -> ('a * 'b) -> Xml_datatype.xmlval to_pair : (Xml_datatype.xml -> 'a) -> (Xml_datatype.xml -> 'b) -> Xml_datatype.xml -> 'a * 'bval of_union : ('a -> Xml_datatype.xml) -> ('b -> Xml_datatype.xml) -> ('a, 'b) CSig.union -> Xml_datatype.xmlval to_union : (Xml_datatype.xml -> 'a) -> (Xml_datatype.xml -> 'b) -> Xml_datatype.xml -> ('a, 'b) CSig.unionval of_edit_id : int -> Xml_datatype.xmlval to_edit_id : Xml_datatype.xml -> intval of_loc : Loc.t -> Xml_datatype.xmlval to_loc : Xml_datatype.xml -> Loc.tval of_xml : Xml_datatype.xml -> Xml_datatype.xmlval to_xml : Xml_datatype.xml -> Xml_datatype.xml