1 (load "tools/prepare-image") 2 (defvar *output* "demo") 3 #+sbcl 4 (sb-ext:save-lisp-and-die *output* 5 :purify t 6 :toplevel 'homer:main 7 :executable t) 8 #+ccl 9 (ccl:save-application *output* 10 :toplevel-function 'screenshotbot-sdk:main)