通用-xmlpickler
此包允许您自动派生hxt(赫兹)泡菜机(转换为和xml)使用GHC Generics。它是从正则xmlpickler
一个简单的例子:
{-#LANGUAGE派生通用#-}进口GHC。泛型导入数据。可能(listToMaybe)导入泛型。XmlPickler(gxpickle)导入文本。XML。HXT公司。箭头。Pickle(XmlPickler(..),showPickled,unpickleDoc)导入文本。XML。HXT公司。分析器。XmlParsec(外部参照)data User=用户{name::字符串,管理员::Bool}派生(显示,通用)实例XmlPickler用户,其中xpickle=gxpickleuserString::字符串userString=showPickled[](用户“Simon”True)--=“<user><name>Simon</name><admin>true</admin></user>”用户::可能用户user=unpickleDoc xpickle=<<listToMaybe(xread“<user><name>Simon</name><admin>true</admin></user>”)--=Just(用户{name=“Simon”,admin=True})