Main rewrite. Recursively convert any throwaway statements into null statements.
Theorem:
(defthm return-type-of-vl-lint-stmt-rewrite.new-x (b* ((?new-x (vl-lint-stmt-rewrite x))) (vl-stmt-p new-x)) :rule-classes :rewrite)
Theorem:
(defthm return-type-of-vl-lint-stmtlist-rewrite.new-x (b* ((?new-x (vl-lint-stmtlist-rewrite x))) (and (vl-stmtlist-p new-x) (equal (len new-x) (len x)))) :rule-classes :rewrite)