:: Ord a => [a] -> [a] -package:containers -package:lens -is:exact -package:extra -package:lifted-base -package:mono-traversable is:exact -package:ghc 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.