Pretty-print a module to a plain-text string.
(vl-pps-module x) → str
(vl-pps-module x) pretty-prints the vl-module-p
Alternatives:
Function:
(defun vl-pps-module (x) (declare (xargs :guard (vl-module-p x))) (let ((__function__ 'vl-pps-module)) (declare (ignorable __function__)) (with-local-ps (vl-pp-module x nil))))
Theorem:
(defthm stringp-of-vl-pps-module (b* ((str (vl-pps-module x))) (stringp str)) :rule-classes :type-prescription)
Theorem:
(defthm vl-pps-module-of-vl-module-fix-x (equal (vl-pps-module (vl-module-fix x)) (vl-pps-module x)))
Theorem:
(defthm vl-pps-module-vl-module-equiv-congruence-on-x (implies (vl-module-equiv x x-equiv) (equal (vl-pps-module x) (vl-pps-module x-equiv))) :rule-classes :congruence)