From 3ec386a8c3d9bfe7f6206c315bb4994c00c7326b Mon Sep 17 00:00:00 2001 From: Saba Saba Date: Thu, 9 Feb 2023 12:26:21 -0500 Subject: [PATCH] Modified make and make-install to make it easier to generate a patch of the running executable. --- git-repl.cl | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/git-repl.cl b/git-repl.cl index 0574ce2..8fd2c28 100644 --- a/git-repl.cl +++ b/git-repl.cl @@ -225,12 +225,14 @@ (terpri) (force-output))))) -(defun-public make (executable-name) +(defun-public make (executable-name &key (source-file nil)) "Compiles the current state into an executable" (progn - (load (compile-file "git-repl.cl")) + (if source-file + (load (compile-file source-file)) + nil) (save-lisp-and-die executable-name :toplevel #'main :executable t))) -(defun-public make-install () +(defun-public make-install (&key (source-file "git-repl.cl")) "Compiles the current state into an executable and installs it to *installation-file*" - (make *installation-file*)) + (make *installation-file* :source-file source-file)) -- 2.20.1