From f54d84046bc22b0f3984c7d92cff03a8f72c88ae Mon Sep 17 00:00:00 2001
From: David Botton <david@botton.com>
Date: Thu, 11 Jul 2024 13:48:03 -0400
Subject: [PATCH] relax asdf on windows for swank

---
 OCICL.md                              | 8 ++++++++
 clog.asd                              | 2 +-
 templates/projects/clog/README.md     | 3 +++
 templates/projects/clog/run-ocicl.bat | 1 +
 templates/projects/clog/run-ql.bat.lt | 1 +
 5 files changed, 14 insertions(+), 1 deletion(-)
 create mode 100644 templates/projects/clog/run-ocicl.bat
 create mode 100644 templates/projects/clog/run-ql.bat.lt

diff --git a/OCICL.md b/OCICL.md
index cf7d3a4..5f7f07b 100644
--- a/OCICL.md
+++ b/OCICL.md
@@ -21,6 +21,14 @@ sbcl --userinit init --eval "(asdf:load-system :clog/tools)" --eval "(clog-tools
 ```
 (or replace ecl for sbcl)
 
+On Windows:
+
+```
+sbcl --userinit init --eval "(setf asdf:*compile-file-failure-behaviour* :warn)" --eval "(asdf:load-system :clog/tools)" --eval "(clog-tools:clog-builder :port 0 :app t)"
+
+and after first run can use run-ocicl.bat
+```
+
 
 I N S T A L L
 =============
diff --git a/clog.asd b/clog.asd
index fcfac4a..0ada6f3 100644
--- a/clog.asd
+++ b/clog.asd
@@ -72,7 +72,7 @@
 
 (asdf:defsystem #:clog/tools
   :depends-on (#:clog #:clog-ace #:clog-terminal #:s-base64 #:cl-indentify
-               #:definitions #:parenscript #:trivial-main-thread)
+               #:definitions #:parenscript #:trivial-main-thread #:swank)
   :pathname "tools/"
   :components (;; clog-db-admin app
                (:file "clog-db-admin")
diff --git a/templates/projects/clog/README.md b/templates/projects/clog/README.md
index 066ff85..702c4bf 100644
--- a/templates/projects/clog/README.md
+++ b/templates/projects/clog/README.md
@@ -3,6 +3,9 @@
 
 This is a project to do ... something.
 
+run-ocicl.bat - run the clog-builder for this project if using ocicl
+run-ql.bat    - run the clog-builder for this project if using QuickLisp
+
 ## License
 
 Specify license here
diff --git a/templates/projects/clog/run-ocicl.bat b/templates/projects/clog/run-ocicl.bat
new file mode 100644
index 0000000..430b860
--- /dev/null
+++ b/templates/projects/clog/run-ocicl.bat
@@ -0,0 +1 @@
+sbcl --userinit init --eval "(setf asdf:*compile-file-failure-behaviour* :warn)" --eval "(asdf:load-system :clog/tools)" --eval "(clog-tools:clog-builder :port 0 :app t)"
\ No newline at end of file
diff --git a/templates/projects/clog/run-ql.bat.lt b/templates/projects/clog/run-ql.bat.lt
new file mode 100644
index 0000000..2eac08a
--- /dev/null
+++ b/templates/projects/clog/run-ql.bat.lt
@@ -0,0 +1 @@
+sbcl --eval "(ql:quickload :clog/tools)" --eval "(clog-tools:clog-builder :project :<%= (@ sys-name) %> :port 0 :app t)"
\ No newline at end of file