Introduce ppx_xmltoty.