(vl-lint-ignore-att-mash x) → *
Function:
(defun vl-lint-ignore-att-mash (x) (declare (xargs :guard (and (stringp x) (vl-lint-ignore-att-p x)))) (let ((__function__ 'vl-lint-ignore-att-mash)) (declare (ignorable __function__)) (b* ((x (str::strsubst "-" "_" x)) ((when (equal (length x) (length "lint_ignore"))) "") (x (ec-call (subseq x (length "lint_ignore") nil)))) (vl-mash-warning-string x))))