haskell parser using papillon