From e90dc42283c9f88a41a9b58195cb1cfa33e6c0f5 Mon Sep 17 00:00:00 2001
From: Brady Stanton <bradystanton@fastmail.com>
Date: Mon, 12 Dec 2022 14:11:53 -0800
Subject: [PATCH] SBCL on Windows not built with compression by default.

---
 clogframe/make-builder.bat | 1 +
 clogframe/make-snake.bat   | 1 +
 2 files changed, 2 insertions(+)
 create mode 100644 clogframe/make-builder.bat
 create mode 100644 clogframe/make-snake.bat

diff --git a/clogframe/make-builder.bat b/clogframe/make-builder.bat
new file mode 100644
index 0000000..de1e88b
--- /dev/null
+++ b/clogframe/make-builder.bat
@@ -0,0 +1 @@
+sbcl --eval "(ql:quickload :clog/tools)" --eval "(sb-ext:save-lisp-and-die #P\"builder.exe\" :toplevel (lambda () (clog-tools:clog-builder :port 0 :app t :start-browser nil :clogframe t)) :executable t :compression nil)"
diff --git a/clogframe/make-snake.bat b/clogframe/make-snake.bat
new file mode 100644
index 0000000..ef3ef87
--- /dev/null
+++ b/clogframe/make-snake.bat
@@ -0,0 +1 @@
+sbcl --eval "(ql:quickload :clog)" --eval "(clog:load-demo 1)"  --eval "(sb-ext:save-lisp-and-die #P\"snake.exe\" :toplevel (lambda () (clog-demo-1:start-demo :port 0 :app t :start-browser nil :clogframe t) (loop (sleep 10))) :executable t :compression nil)"
\ No newline at end of file