Remove unused reference.

src/GenericParser/Parser.purs

@@ -123,7 +123,7 @@ try p = Parser p'
 sat :: forall e. (Char -> Boolean) -> Parser e Char
 sat p = do pos <- current_position
            x <- item
-           if p x then pure x else Parser \input -> failure pos
+           if p x then pure x else Parser \_ -> failure pos
 
 digit :: forall e. Parser e Char
 digit = sat isDigit