:: Ord a => [a] -> [a] -package:lens -package:extra -package:vector-algorithms -package:basement -package:Cabal-syntax -package:ghc is:exact -package:errors 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.