Add some preprocessor output unless we're currently
(vl-ppst-maybe-write1 echar &key (ppst 'ppst)) → ppst
Function:
(defun vl-ppst-maybe-write1$inline (echar ppst) (declare (xargs :stobjs (ppst))) (declare (xargs :guard (vl-echar-p echar))) (let ((__function__ 'vl-ppst-maybe-write1)) (declare (ignorable __function__)) (if (vl-ppst->activep) (vl-ppst-update-acc (cons echar (vl-ppst->acc))) ppst)))