X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fmonitor.c;h=e61faf32d71a28d79780cba108a014f4d8488f61;hb=93c941d86b264637de20aa1b713757b704d4c1a6;hp=ffefafac23fd326cac09622f312ab2832321a903;hpb=503a50f07740b52908f630b0492cf56556f1a792;p=sbcl.git diff --git a/src/runtime/monitor.c b/src/runtime/monitor.c index ffefafa..e61faf3 100644 --- a/src/runtime/monitor.c +++ b/src/runtime/monitor.c @@ -33,6 +33,10 @@ #include "globals.h" #include "lispregs.h" #include "interrupt.h" +#include "genesis/static-symbols.h" +#include "genesis/primitive-objects.h" + + /* When we need to do command input, we use this stream, which is not * in general stdin, so that things will "work" (as well as being @@ -279,7 +283,7 @@ quit_cmd(char **ptr) fflush(stdout); fgets(buf, sizeof(buf), ldb_in); if (buf[0] == 'y' || buf[0] == 'Y' || buf[0] == '\n') - exit(0); + exit(1); } static void