Fix --subexps

This commit is contained in:
Alexander Rosenberg 2024-09-03 22:18:35 -07:00
parent da53ad73a1
commit 24c1a03b35
Signed by: Zander671
GPG Key ID: 5FD0394ADBD72730

View File

@ -1017,7 +1017,8 @@ arguments."
prop-strs :format (option-value 'format opts) prop-strs :format (option-value 'format opts)
:implicit-and (not (option-value 'no-implicit opts)) :implicit-and (not (option-value 'no-implicit opts))
:multi-char-names (option-value 'multi-char opts) :multi-char-names (option-value 'multi-char opts)
:include-vars (not (option-value 'no-vars opts)))) :include-vars (not (option-value 'no-vars opts))
:include-intermediate (option-value 'subexps opts)))
(terpri))))))) (terpri)))))))
(defun toplevel () (defun toplevel ()