marcuskammer/dev.metalisp.survey
1
0
Fork 0
Code Issues 9 Pull requests Projects Releases Packages Wiki Activity Actions

Better naming for the binary

Browse source
This commit is contained in:
Marcus Kammer 2024-07-08 17:52:17 +02:00
parent cdd4deadf4
commit 2be35dd474
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
create-core.lisp
View file

@ -8,7 +8,8 @@
(quicklisp-setup) (quicklisp-setup)
(ql:quickload :dev.metalisp.survey) (ql:quickload :dev.metalisp.survey)
(let ((app-name (uiop:os-cond ((eq :os-windows (uiop:detect-os)) "survey-buttler.exe") (let* ((os (uiop:detect-os))
((eq :os-unix (uiop:detect-os)) "survey-buttler")))) (app-name (uiop:os-cond ((eq :os-windows os) "ml-survey.exe")
((eq :os-unix os) "ml-survey"))))
(sb-ext:save-lisp-and-die app-name :executable t :toplevel 'ml-survey:main)) (sb-ext:save-lisp-and-die app-name :executable t :toplevel 'ml-survey:main))
(quit) (quit)