Should we print expressions with extra parentheses? This may be useful when you want to show the precedence in a very explicit way.
(vl-ps->copious-parens-p &key (ps 'ps)) → *
See also vl-ps-update-copious-parens.
Function:
(defun vl-ps->copious-parens-p-fn (ps) (declare (xargs :stobjs (ps))) (declare (xargs :guard t)) (let ((__function__ 'vl-ps->copious-parens-p)) (declare (ignorable __function__)) (cdr (assoc-equal :vl-copious-parens (vl-ps->misc)))))