[Intro] (instrumental) [Verse] (defun handler (args) (let ((files (clingon:command-arguments args)) (lex (clingon:getopt args :lex)) (parse (clingon:getopt args :parse)) (dump (clingon:getopt args :dump)) (primitives (clingon:getopt args :primitives)) (no-compile (clingon:getopt args :no-compile))) (let ((llvm:*builder* (llvm:create-builder))) (when primitives (@lisp:emit-primitives primitives)) (when lex (loop for f in files do (format t