Syntax highlighting and comment
This commit is contained in:
+4
-1
@@ -2075,8 +2075,10 @@ static Lisp parse(Lexer* lex, LispError* out_error, LispContext ctx)
|
||||
result = lisp_cons(get_sym(SYM_BEGIN, ctx), lisp_list_reverse(result), ctx);
|
||||
}
|
||||
|
||||
if (out_error) *out_error = error;
|
||||
if (out_error)
|
||||
*out_error = error;
|
||||
return result;
|
||||
|
||||
}
|
||||
|
||||
Lisp lisp_read(const char *program, LispError* out_error, LispContext ctx)
|
||||
@@ -2122,6 +2124,7 @@ void* fread_all_(FILE* file, size_t* out_size) {
|
||||
return NULL;
|
||||
}
|
||||
data = new_data;
|
||||
memset(data + *out_size, 0, cap - *out_size);
|
||||
}
|
||||
|
||||
size_t read = fread(data + *out_size, 1, BLOCK_SIZE, file);
|
||||
|
||||
Reference in New Issue
Block a user