Bruce/tomo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Activity

Bugfix table compilation

Browse Source
This commit is contained in:
Bruce Hill 2024-02-24 15:39:33 -05:00
parent 71b7392b08
commit dbad340c29
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compile.c
View File

@ -522,17 +522,16 @@ CORD compile(env_t *env, ast_t *ast)
compile_type(key_t), ", ",
compile_type(value_t), ", ",
compile_type_info(env, key_t), ", ",
compile_type_info(env, value_t), ", /*fallback:*/");
compile_type_info(env, value_t));
if (table->fallback)
code = CORD_all(code, "$heap(", compile(env, table->fallback), ");\n");
code = CORD_all(code, ", /*fallback:*/ $heap(", compile(env, table->fallback), ")");
else
code = CORD_all(code, "NULL, ");
code = CORD_all(code, ", /*fallback:*/ NULL");
code = CORD_cat(code, "/*default:*/");
if (table->default_value)
code = CORD_all(code, "$heap(", compile(env, table->default_value), ");\n");
code = CORD_all(code, ", /*default:*/ $heap(", compile(env, table->default_value), ")");
else
code = CORD_all(code, "NULL");
code = CORD_all(code, ", /*default:*/ NULL");
for (ast_list_t *entry = table->entries; entry; entry = entry->next) {
auto e = Match(entry->ast, TableEntry);