loxStatement :: Char -> GenParser Char st (Either String String)
loxStatement sep = Right <$> (char sep *> many1 (noneOf [sep, '\n']) <* char sep)
loxStatement :: Char -> GenParser Char st (Either String String)
loxStatement sep = Right <$> (char sep *> many1 (noneOf [sep, '\n']) <* char sep)
loxStatement sep = Right <$> (char sep *> many1 (noneOf [sep, '\n']) <* char sep)