[Haskell-cafe] Parsec lookAhead with choice (<|>) doesn't work as expected?