Open-Argon/Chloride
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix some memory leaks

Browse Source
This commit is contained in:
William Bell
2025-07-09 14:47:16 +01:00
parent 66b44e8f3a
commit fe7eaa8de3
4 changed files with 12 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
src/err.c
View File

@@ -92,21 +92,20 @@ void output_err(ArErr err) {
getline(&buffer, &size, file); getline(&buffer, &size, file);
char *line_starts = buffer; char *line_starts = buffer;
char line_column = err.column; while (*line_starts && isspace((unsigned char)*line_starts) && line_starts-buffer < err.column-1) {
while (*line_starts && isspace((unsigned char)*line_starts) && line_starts-buffer < err.column) {
line_starts++; line_starts++;
line_column--; err.column--;
} }
fprintf(stderr, " %zu | ", err.line); fprintf(stderr, " %zu | ", err.line);
if (err.length) { if (err.length) {
fprintf(stderr, "%.*s", (int)line_column - 1, line_starts); fprintf(stderr, "%.*s", (int)err.column-1, line_starts);
dyefg(stderr, DYE_RED); dyefg(stderr, DYE_RED);
dye_style(stderr, DYE_STYLE_BOLD); dye_style(stderr, DYE_STYLE_BOLD);
fprintf(stderr, "%.*s", err.length, line_starts + line_column - 1); fprintf(stderr, "%.*s", err.length, line_starts + err.column - 1);
dye_style(stderr, DYE_STYLE_RESET); dye_style(stderr, DYE_STYLE_RESET);
dyefg(stderr, DYE_RESET); dyefg(stderr, DYE_RESET);
fprintf(stderr, "%s", line_starts + (int)line_column + err.length - 1); fprintf(stderr, "%s", line_starts + (int)err.column + err.length - 1);
for (int64_t i = 0; i < line_column - 1; i++) { for (int64_t i = 0; i < err.column - 1; i++) {
fprintf(stderr, " "); fprintf(stderr, " ");
} }
} else { } else {
@@ -119,7 +118,7 @@ void output_err(ArErr err) {
} }
fprintf(stderr, "| "); fprintf(stderr, "| ");
for (int i = 1; i < line_column; i++) { for (int i = 1; i < err.column; i++) {
fprintf(stderr, " "); fprintf(stderr, " ");
} }
dyefg(stderr, DYE_RED); dyefg(stderr, DYE_RED);

2
src/main.c
View File

@@ -291,7 +291,7 @@ Execution execute(char *absolute_path) {
RuntimeState state = init_runtime_state(translated); RuntimeState state = init_runtime_state(translated);
Stack main_scope = create_scope(NULL); Stack main_scope = create_scope(NULL);
ArErr err = runtime(translated, state, main_scope); ArErr err = runtime(translated, state, main_scope);
free(state.registers);
end = clock(); end = clock();
time_spent = (double)(end - start) / CLOCKS_PER_SEC; time_spent = (double)(end - start) / CLOCKS_PER_SEC;
total_time_spent += time_spent; total_time_spent += time_spent;

5
src/parser/parser.c
View File

@@ -88,12 +88,13 @@ ParsedValueReturn parse_token_full(char *file, DArray *tokens, size_t *index,
case TOKEN_NEW_LINE: case TOKEN_NEW_LINE:
(*index)++; (*index)++;
return (ParsedValueReturn){no_err, NULL}; return (ParsedValueReturn){no_err, NULL};
case TOKEN_INDENT: case TOKEN_INDENT:;
Token *token_indent = token;
if (strlen(token->value) > 0 && (*index + 1) < tokens->size) { if (strlen(token->value) > 0 && (*index + 1) < tokens->size) {
token = darray_get(tokens, (*index) + 1); token = darray_get(tokens, (*index) + 1);
if (token->type != TOKEN_NEW_LINE) { if (token->type != TOKEN_NEW_LINE) {
return (ParsedValueReturn){ return (ParsedValueReturn){
create_err(token->line, token->column, token->length, file, create_err(token_indent->line, token_indent->column, token_indent->length, file,
"Syntax Error", "unexpected indent"), "Syntax Error", "unexpected indent"),
NULL}; NULL};
} }

2
testing.ar
View File

@@ -1 +1 @@
term.log("hello world") let x = 10