Recognizer for integers between two bounds.
The predicate (integer-range-p lower upper x) tests whether x is an integer greater than or equal to lower and less than upper.
Function: integer-range-p
(defun integer-range-p (lower upper x) (declare (type integer lower upper)) (and (integerp x) (<= lower x) (< x upper)))