Felix Brendel 6 年前
父节点
当前提交
29d15001f9
共有 2 个文件被更改,包括 13 次插入6 次删除
  1. +12
    -4
      src/eval.cpp
  2. +1
    -2
      src/memory.cpp

+ 12
- 4
src/eval.cpp 查看文件

@@ -533,13 +533,21 @@ namespace Slime {
Lisp_Object* parsed, * evaluated;
while (true) {
delete_error();
if (Globals::error) {
log_error();
delete_error();
}
fputs("> ", stdout);
line = read_expression();
try_void parsed = Parser::parse_single_expression(line);
parsed = Parser::parse_single_expression(line);
if (Globals::error) {
continue;
}
free(line);
try_void evaluated = eval_expr(parsed);
// try_void evaluated = eval_expr(parsed);
evaluated = eval_expr(parsed);
if (Globals::error) {
continue;
}
if (evaluated && evaluated != Memory::nil) {
print(evaluated);
}


+ 1
- 2
src/memory.cpp 查看文件

@@ -210,8 +210,7 @@ namespace Slime::Memory {
}
};
char* exe_path = get_exe_dir();
// don't free exe path because it will be used until end of time
Globals::load_path.alloc();
global_symbol_table.alloc();
global_keyword_table.alloc();


正在加载...
取消
保存