(vl-class-scan-for-ignore x mwtype) → ignorep
Function:
(defun vl-class-scan-for-ignore (x mwtype) (declare (xargs :guard (and (vl-class-p x) (stringp mwtype)))) (let ((__function__ 'vl-class-scan-for-ignore)) (declare (ignorable __function__)) (b* (((vl-class x) (vl-class-fix x))) (b* ((ignorep (vl-lint-atts-say-ignore x.atts mwtype)) (ignorep1 (vl-paramdecllist-scan-for-ignore x.paramdecls mwtype)) (ignorep (or ignorep1 ignorep)) (ignorep1 (vl-fundecllist-scan-for-ignore x.fundecls mwtype)) (ignorep (or ignorep1 ignorep)) (ignorep1 (vl-taskdecllist-scan-for-ignore x.taskdecls mwtype)) (ignorep (or ignorep1 ignorep)) (ignorep1 (vl-vardecllist-scan-for-ignore x.vardecls mwtype)) (ignorep (or ignorep1 ignorep)) (ignorep1 (vl-importlist-scan-for-ignore x.imports mwtype)) (ignorep (or ignorep1 ignorep)) (ignorep1 (vl-typedeflist-scan-for-ignore x.typedefs mwtype)) (ignorep (or ignorep1 ignorep))) ignorep))))
Theorem:
(defthm booleanp-of-vl-class-scan-for-ignore (b* ((ignorep (vl-class-scan-for-ignore x mwtype))) (booleanp ignorep)) :rule-classes :type-prescription)
Theorem:
(defthm vl-class-scan-for-ignore-of-vl-class-fix-x (equal (vl-class-scan-for-ignore (vl-class-fix x) mwtype) (vl-class-scan-for-ignore x mwtype)))
Theorem:
(defthm vl-class-scan-for-ignore-vl-class-equiv-congruence-on-x (implies (vl-class-equiv x x-equiv) (equal (vl-class-scan-for-ignore x mwtype) (vl-class-scan-for-ignore x-equiv mwtype))) :rule-classes :congruence)
Theorem:
(defthm vl-class-scan-for-ignore-of-str-fix-mwtype (equal (vl-class-scan-for-ignore x (str-fix mwtype)) (vl-class-scan-for-ignore x mwtype)))
Theorem:
(defthm vl-class-scan-for-ignore-streqv-congruence-on-mwtype (implies (streqv mwtype mwtype-equiv) (equal (vl-class-scan-for-ignore x mwtype) (vl-class-scan-for-ignore x mwtype-equiv))) :rule-classes :congruence)