external pretty_xml_of_dom : JSOO.obj -> string = "caml_js_pretty_xml_of_dom"