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

Minor fixes

Browse Source
This commit is contained in:
Bruce Hill 2024-05-18 20:53:03 -04:00
parent 1df26851d7
commit e4e3186959
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compile.c
View File

@ -732,7 +732,7 @@ CORD compile_statement(env_t *env, ast_t *ast)
auto decl = Match(if_->condition, Declare);
env_t *true_scope = fresh_scope(env);
const char *name = Match(decl->var, Var)->name;
CORD var_code = CORD_cat(env->scope_prefix, name);
CORD var_code = CORD_cat(env->scope_prefix ? env->scope_prefix : "$", name);
type_t *var_t = get_type(env, decl->value);
if (var_t->tag == PointerType) {
auto ptr = Match(var_t, PointerType);
@ -2251,11 +2251,12 @@ module_code_t compile_file(ast_t *ast)
"extern ", compile_type(env, t), " ", env->file_prefix, decl_name, " = ",
compile(env, decl->value), ";\n");
}
} else if (stmt->ast->tag == InlineCCode) {
CORD code = compile_statement(env, stmt->ast);
env->code->imports = CORD_all(env->code->imports, code, "\n");
} else {
CORD code = compile_statement(env, stmt->ast);
assert(!code);
// if (code)
// env->code->main = CORD_all(env->code->main, code, "\n");
}
}