在Haskell中逐字复制XML输入到输出

问：

根据标题。该应用程序是用户编写的配置文件，可能必须不时地在某些部分进行更新，但其他方面应保持不变。起点只是为了能够将输入原封不动地传递到输出。

我接受输入和几乎是等效的，可能不会在输出中区分，但除此之外，我想尽可能多地保留 XML。<tag></tag><tag/>

第一次尝试是 Text.XML.HaXml.SAX.saxParse，但它在注释后抑制空格，例如：

<!-- next section: -->
<section>
    ...
</section>

解析为：

<!-- next section: --><section>
    ...
</section>

这是一个不可接受的变化。下一次尝试是在 http://pastebin.com/qNyVuBK7 时通过 HXT，除了属性数据中的实体被混淆之外，这效果很好;例如，

<view UID="&Label;" ifNotNull="&Term;">

成为

<view UID="&amp;Label;" ifNotNull="&amp;Term;">

即使正常文本数据中的实体被正确传递。谁能建议如何解决最后一个问题，或者实现目标的其他方法？

似乎 https://hackage.haskell.org/package/roundtrip-xml-0.2.0.0 可能会有所帮助，但我找不到任何关于如何使用它的文档。