Recognize true lists of bits.
(bit-listp x) → std::bool
This is an ordinary std::deflist. It is
"strict" in that it requires
Function:
(defun bit-listp (x) (declare (xargs :guard t)) (let ((__function__ 'bit-listp)) (declare (ignorable __function__)) (if (consp x) (and (bitp (car x)) (bit-listp (cdr x))) (null x))))