XML parser written by Haskell