:: Ord a => [a] -> [a] -package:singletons -package:mono-traversable -package:extra -package:errors -package:ghc -package:safe -package:base -package:witherable package:parsers

Take a parser that may consume input, and on failure, go back to where we started and fail as if we didn't consume input.