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

enable to enable-debugger with script on sbcl.

Browse source
This commit is contained in:
SANO Masatoshi 2016-11-01 11:59:43 +09:00
parent 262e273e00
commit 57a6265212
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/cmd-run-sbcl.c
View file

@ -17,6 +17,8 @@ char** cmd_run_sbcl(int argc,char** argv,struct sub_command* cmd) {
char* program=get_opt("program",0);
char* dynamic_space_size=get_opt("dynamic-space-size",0);
char* control_stack_size=get_opt("control-stack-size",0);
char* enable_debugger=get_opt("enable-debugger",0);
char* sbcl_home=cat(impl_path,"/lib/sbcl",NULL);
LVal ret=0;
@ -70,7 +72,7 @@ char** cmd_run_sbcl(int argc,char** argv,struct sub_command* cmd) {
/* runtime options end here */
ret=conss(q("--no-sysinit"),ret);
ret=conss(q("--no-userinit"),ret);
if(script)
if(script && !enable_debugger)
ret=conss(q("--disable-debugger"),ret);
ret=conss(q("--eval"),ret);