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

turn off quicklisp option if not installed

Browse source
This commit is contained in:
SANO Masatoshi 2014-11-14 11:57:15 +09:00
parent 023d147260
commit 4290d744e5
1 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/cmds/run/sbcl.c
View file

@ -39,9 +39,16 @@ char** cmd_run_sbcl(int argc,char** argv,struct sub_command* cmd)
offset+=1;
if(script)
offset+=1;
if(quicklisp)
offset+=2;
if(quicklisp) {
char* setup_file=
cat(home,"impls",SLASH,"ALL",SLASH,"ALL",SLASH,"quicklisp",SLASH,"setup.lisp",NULL);
if(file_exist_p(setup_file)) {
offset+=2;
}else {
quicklisp=0;
}
s(setup_file);
}
if(program||script)
offset+=4;