mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-05-12 20:34:14 +00:00
Code Issues 1 Releases Wiki Activity

MSVC and strange errors.

Browse Source
This commit is contained in:
Calvin Rose 2024-09-29 12:30:51 -05:00
parent e96dd512f3
commit f36d544deb
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/core/sysir.c
View File

@ -1220,7 +1220,7 @@ static void janet_sys_ir_init(JanetSysIR *out, JanetView instructions, JanetSysI
/* Patch up name mapping arrays */ /* Patch up name mapping arrays */
/* TODO - make more efficient, don't rebuild from scratch every time */ /* TODO - make more efficient, don't rebuild from scratch every time */
if (linkage->type_names) janet_free(linkage->type_names); if (linkage->type_names) janet_free((void *) linkage->type_names);
linkage->type_names = table_to_string_array(linkage->type_name_lookup, linkage->type_def_count); linkage->type_names = table_to_string_array(linkage->type_name_lookup, linkage->type_def_count);
ir.register_names = table_to_string_array(ir.register_name_lookup, ir.register_count); ir.register_names = table_to_string_array(ir.register_name_lookup, ir.register_count);
@ -1774,7 +1774,7 @@ static int sysir_gc(void *p, size_t s) {
janet_free(ir->constants); janet_free(ir->constants);
janet_free(ir->types); janet_free(ir->types);
janet_free(ir->instructions); janet_free(ir->instructions);
janet_free(ir->register_names); janet_free((void *) ir->register_names);
return 0; return 0;
} }
@ -1804,7 +1804,7 @@ static int sysir_context_gc(void *p, size_t s) {
(void) s; (void) s;
janet_free(linkage->field_defs); janet_free(linkage->field_defs);
janet_free(linkage->type_defs); janet_free(linkage->type_defs);
janet_free(linkage->type_names); janet_free((void *) linkage->type_names);
return 0; return 0;
} }