(vl-simple-id-head-list-p x) recognizes lists where every element satisfies vl-simple-id-head-p.
(vl-simple-id-head-list-p x) → std::bool
This is an ordinary deflist. It is
"loose" in that it does not care whether
Function:
(defun vl-simple-id-head-list-p (x) (declare (xargs :guard (character-listp x))) (let ((__function__ 'vl-simple-id-head-list-p)) (declare (ignorable __function__)) (if (consp x) (and (vl-simple-id-head-p (car x)) (vl-simple-id-head-list-p (cdr x))) t)))