(vl-stmt-lvalexprs x) → exprs
Theorem:
(defthm return-type-of-vl-stmt-lvalexprs.exprs (b* ((?exprs (vl-stmt-lvalexprs x))) (and (vl-exprlist-p exprs) (vl-exprlist-lvaluesp exprs))) :rule-classes :rewrite)
Theorem:
(defthm return-type-of-vl-stmtlist-lvalexprs.exprs (b* ((?exprs (vl-stmtlist-lvalexprs x))) (and (vl-exprlist-p exprs) (vl-exprlist-lvaluesp exprs))) :rule-classes :rewrite)
Theorem:
(defthm vl-stmt-lvalexprs-nrev-removal (equal (vl-stmt-lvalexprs-nrev x nrev) (append nrev (vl-stmt-lvalexprs x))))
Theorem:
(defthm vl-stmtlist-lvalexprs-nrev-removal (equal (vl-stmtlist-lvalexprs-nrev x nrev) (append nrev (vl-stmtlist-lvalexprs x))))