[Haskell-cafe] parsec and multiple simultaneous token types