Added command to build an executable with a REPL.

diff --git a/git-skipper-load.cl b/git-skipper-load.cl
index 193a411..18d8df5 100644 (file)
--- a/git-skipper-load.cl
+++ b/git-skipper-load.cl
@@ -1,3 +1,4 @@
-(in-package :cl-user)
-
 (load (compile-file "git-skipper.cl"))
+(save-lisp-and-die "git-skipper.exe" :executable t)
+
+; sbcl --load git-skipper.cl

diff --git a/git-skipper.cl b/git-skipper.cl
index b6ed3a9..fbf8290 100644 (file)
--- a/git-skipper.cl
+++ b/git-skipper.cl
@@ -1,3 +1,5 @@
+; sbcl --load git-skipper.cl
+
 (ql:quickload '("cl-utilities" "str"))
 
 (in-package :cl-user)
@@ -40,3 +42,8 @@
 
 (defun delete-merged-branches ()
   (mapcar #'delete-branch (git "branch" "--merged")))
+
+(defun make ()
+  (progn
+    (load (compile-file "git-skipper.cl"))
+    (save-lisp-and-die "git-skipper.exe" :executable t)))