import Test.Tasty ( TestTree, testGroup )
import Test.Tasty.HUnit ( (@?=), testCase )
import Text.XML.HXT.Core (
import Test.Tasty ( TestTree, testGroup )
import Test.Tasty.HUnit ( (@?=), testCase )
import Text.XML.HXT.Core (
xpWrap (from_tuple, to_tuple) $
xpTriple (xpElem "XML_File_ID" xpInt)
(xpElem "heading" xpText)
xpWrap (from_tuple, to_tuple) $
xpTriple (xpElem "XML_File_ID" xpInt)
(xpElem "heading" xpText)