:: Ord a => [a] -> [a] -package:containers -package:ghc -package:lifted-base -package:integration -package:extra -package:hedgehog -package:vector -package:base package:parsers is:exact

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.