From 8ea9fc44fb76060010356324d3bb94ca2e365cc5 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <code@mail.matthias.benkard.de>
Date: Mon, 28 May 2007 16:52:54 +0200
Subject: Beginnings of a CGI web journal.

darcs-hash:69ce37acf510a840750e060433eaa72e64dfc6a1
---
 make-core-image.sh | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100755 make-core-image.sh

(limited to 'make-core-image.sh')

diff --git a/make-core-image.sh b/make-core-image.sh
new file mode 100755
index 0000000..d396b48
--- /dev/null
+++ b/make-core-image.sh
@@ -0,0 +1,12 @@
+#! /bin/sh
+clisp -q -q -on-error exit <<EOF
+(dolist (system '(:cl-ppcre :cl-fad :iterate :cl-markdown :parenscript
+                  :yaclml :lisp-cgi-utils))
+  (clc:clc-require system))
+(saveinitmem "lispinit.mem")
+(quit)
+EOF
+
+if [ x$? = x0 ]; then
+    gzip -f lispinit.mem
+fi
-- 
cgit v1.2.3