chiark / gitweb /
zone-run: Add simple script for running `zone' without a vast image. master
authorMark Wooding <mdw@distorted.org.uk>
Mon, 17 Jun 2024 16:40:59 +0000 (17:40 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Mon, 17 Jun 2024 16:40:59 +0000 (17:40 +0100)
zone-run [new file with mode: 0755]

diff --git a/zone-run b/zone-run
new file mode 100755 (executable)
index 0000000..8865ca0
--- /dev/null
+++ b/zone-run
@@ -0,0 +1,9 @@
+#! /usr/bin/runlisp
+;;; -*-lisp-*-
+
+(asdf:clear-configuration)
+(let ((*compile-verbose* nil) (*compile-print* nil)
+      (*load-verbose* nil) (*load-print* nil))
+  (handler-bind ((style-warning #'muffle-warning))
+    (asdf:load-system "zone" :verbose nil)))
+#+runlisp-script (zone.frontend:main)