RosettaCodeData/Task/Compile-time-calculation/Common-Lisp/compile-time-calculation-1.lisp

(eval-when (:compile-toplevel :load-toplevel :execute)
  (defun factorial ...))