felix/slime
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

preven slime from exiting on repl error

Browse Source
This commit is contained in:
FelixBrendel
2020-03-10 13:57:38 +01:00
parent aac3985a61
commit 7559646ada
1 changed files with 12 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/eval.cpp
+12 -4
View File
@@ -584,13 +584,21 @@ namespace Slime {
Lisp_Object* parsed, * evaluated; Lisp_Object* parsed, * evaluated;
while (true) { while (true) {
delete_error(); if (Globals::error) {
log_error();
delete_error();
}
fputs("> ", stdout); fputs("> ", stdout);
line = read_expression(); line = read_expression();
try_void parsed = Parser::parse_single_expression(line); parsed = Parser::parse_single_expression(line);
if (Globals::error) {
continue;
}
free(line); free(line);
try_void evaluated = eval_expr(parsed); evaluated = eval_expr(parsed);
// try_void evaluated = eval_expr(parsed); if (Globals::error) {
continue;
}
if (evaluated && evaluated != Memory::nil) { if (evaluated && evaluated != Memory::nil) {
print(evaluated); print(evaluated);
} }