tokenize :: (ErrorComponent e) => ParsecT e String (Reader (Dictionary a)) [EngToken a]
tokenize = fmap join $ sepBy (some tokenRec) (some spaceChar)
tokenize :: (ErrorComponent e) => ParsecT e String (Reader (Dictionary a)) [EngToken a]
tokenize = fmap join $ sepBy (some tokenRec) (some spaceChar)
tokenize = fmap join $ sepBy (some tokenRec) (some spaceChar)