:: Ord a => [a] -> [a] -package:list-t -package:errors -package:basement -package:base-prelude -package:integration -package:extra -package:vector-algorithms -package:Cabal-syntax -package:safe -package:lifted-base -package:hedgehog -is:exact 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.