diff options
| author |  Tom Willemsen | 2013-03-23 00:15:52 +0100 |
|---|---|---|
| committer | Tom Willemsen | 2013-03-23 00:15:52 +0100 |
| commit | 02be3af2fd2706e69b555faf3f2aa165278995a0 (patch) | |
| tree | ab74d865c2c0c678036d3e7887c990fc39e6d97b /lisp/make-image.lisp | |
| parent | 02a823cc28b03ed97c6c2b596e77642c3e9e8d3f (diff) | |
| download | clark-02be3af2fd2706e69b555faf3f2aa165278995a0.tar.gz clark-02be3af2fd2706e69b555faf3f2aa165278995a0.zip | |
Move lisp sources to lisp/
Diffstat (limited to 'lisp/make-image.lisp')
| -rw-r--r-- | lisp/make-image.lisp | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/lisp/make-image.lisp b/lisp/make-image.lisp new file mode 100644 index 0000000..733cb8c --- /dev/null +++ b/lisp/make-image.lisp @@ -0,0 +1,16 @@ +#-sbcl +(error "This lisp implementation iss not supported.") + +(require 'asdf) +(require 'sqlite) +(require 'mcclim) + +(asdf:oos 'asdf:load-op 'clark) + +(save-lisp-and-die + "clark" :toplevel + (lambda () + (sb-posix:putenv (format nil "SBCL_HOME=~A" #.(sb-ext:posix-getenv "SBCL_HOME"))) + (org.ryuslash.clark:clark sb-ext:*posix-argv*) + 0) + :executable t) |