(tmp-constants (merge-pathnames #p"constants.lisp-temp"
real-output-file)))
(princ (list filename output-file real-output-file
(tmp-constants (merge-pathnames #p"constants.lisp-temp"
real-output-file)))
(princ (list filename output-file real-output-file