let xml_escaper = OUnitLoggerHTML.html_escaper