aboutsummaryrefslogtreecommitdiffstats
path: root/make-image.lisp
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2013-03-20 21:58:10 +0100
committerGravatar Tom Willemsen2013-03-20 21:58:10 +0100
commit94f56cd473dfc950c9263753d3a991b92eff128e (patch)
tree3a57bc39ad91b2f698835823b550ba8baa84527f /make-image.lisp
downloadclark-94f56cd473dfc950c9263753d3a991b92eff128e.tar.gz
clark-94f56cd473dfc950c9263753d3a991b92eff128e.zip
Initial commit
Diffstat (limited to 'make-image.lisp')
-rw-r--r--make-image.lisp16
1 files changed, 16 insertions, 0 deletions
diff --git a/make-image.lisp b/make-image.lisp
new file mode 100644
index 0000000..1221037
--- /dev/null
+++ b/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)
+ 0)
+ :executable t)