Pretty-print a list of modules to a plain-text string.
(vl-pps-modulelist x) → str
See also vl-ppcs-modulelist, which preserves the order of module elements and its comments.
Function:
(defun vl-pps-modulelist (x) (declare (xargs :guard (vl-modulelist-p x))) (let ((__function__ 'vl-pps-modulelist)) (declare (ignorable __function__)) (with-local-ps (vl-pp-modulelist x nil))))
Theorem:
(defthm stringp-of-vl-pps-modulelist (b* ((str (vl-pps-modulelist x))) (stringp str)) :rule-classes :type-prescription)
Theorem:
(defthm vl-pps-modulelist-of-vl-modulelist-fix-x (equal (vl-pps-modulelist (vl-modulelist-fix x)) (vl-pps-modulelist x)))
Theorem:
(defthm vl-pps-modulelist-vl-modulelist-equiv-congruence-on-x (implies (vl-modulelist-equiv x x-equiv) (equal (vl-pps-modulelist x) (vl-pps-modulelist x-equiv))) :rule-classes :congruence)