common-lisp/roswell.roswell
1
0
Fork 0
mirror of https://github.com/roswell/roswell.git synced 2026-09-10 07:16:17 -04:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Fix path

Browse source
This commit is contained in:
gos-k 2021-04-22 00:12:42 +09:00
parent dcde59c8e6
commit f99dc2dc3e
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/install-clasp-bin.lisp
View file

@ -39,7 +39,7 @@
(uiop/filesystem:delete-directory-tree
path :validate t))
(ql-impl-util:rename-directory
(merge-pathnames (format nil "~@{~A~}" "clasp-" version "-x86-64-" uname "/build") impls)
(merge-pathnames (format nil "~@{~A~}" "clasp-" version "-x86-64-" uname "/") impls)
(merge-pathnames (opt "as") impls)))
(cons t argv))

2
src/cmd-run-clasp.c
View file

@ -15,7 +15,7 @@ char** cmd_run_clasp(int argc,char** argv,struct sub_command* cmd) {
LVal ret=0;
char *bin=cat(home,impl_path,SLASH,"boehm/iclasp-boehm",EXE_EXTENTION,NULL);
char *bin=cat(home,impl_path,SLASH,"build/boehm/iclasp-boehm",EXE_EXTENTION,NULL);
s(arch),s(os);
ret=conss(bin,ret);
s(impl_path);