xml - XML をレコードに解析する

Question

Web サービス API で動作する Haskell ライブラリを作成したいと考えています。サーバーから XML または JSON 応答を受け取ります。たとえば、次のようになります。

<foo>
    <bar>1</bar>
    <baz>moo</baz>
</foo>

私はそれを記録に変えたい：

data Foo = Foo {
    bar :: Integer,
    baz :: String
}

XML を手動で解析して個々のコンポーネントを手動で選択する必要がないように、これを抽象化するにはどうすればよいでしょうか? 私は、XML 要素と属性からレコード部分へのマッピングを記述し、残りを自分で実行できる API を望んでいました。