[Haskell-cafe] parsing exercise