many1 +base

many1 :: ReadP a -> ReadP [a]
base Text.ParserCombinators.ReadP
Parses one or more occurrences of the given parser.
skipMany1 :: ReadP a -> ReadP ()
base Text.ParserCombinators.ReadP
Like many1, but discards the result.