From: Saba Saba Date: Thu, 9 Feb 2023 17:26:21 +0000 (-0500) Subject: Modified make and make-install to make it easier to generate a patch of the running... X-Git-Url: http://sabadev.xyz:4321/?a=commitdiff_plain;h=3ec386a8c3d9bfe7f6206c315bb4994c00c7326b;p=git-repl.git Modified make and make-install to make it easier to generate a patch of the running executable. --- 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))