diff options
| author | Bruce Hill <bruce@bruce-hill.com> | 2024-05-27 17:45:22 -0400 |
|---|---|---|
| committer | Bruce Hill <bruce@bruce-hill.com> | 2024-05-27 17:45:22 -0400 |
| commit | c9889582a7f56b3bfdca455a8d84167f688cd3c8 (patch) | |
| tree | 3c56168a946011690ef63d85bc4a0162b7bf5e3e /compile.c | |
| parent | c35e5a84b954085983683d5c68e00ce4667b6812 (diff) | |
Fix up some import and -fPIC stuff
Diffstat (limited to 'compile.c')
| -rw-r--r-- | compile.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1930,7 +1930,7 @@ CORD compile(env_t *env, ast_t *ast) else return Match(ast, InlineCCode)->code; } - case Use: return CORD_EMPTY; + case Use: code_err(ast, "Compiling 'use' as expression!"); case LinkerDirective: code_err(ast, "Linker directives are not supported yet"); case Extern: code_err(ast, "Externs are not supported as expressions"); case TableEntry: code_err(ast, "Table entries should not be compiled directly"); @@ -2218,13 +2218,13 @@ module_code_t compile_file(ast_t *ast) if (!is_constant(env, decl->value)) code_err(decl->value, "This value is not a valid constant initializer."); - if (is_private) { + if (decl->value->tag == Use) { + assert(compile_statement(env, stmt->ast) == CORD_EMPTY); + } else if (is_private) { env->code->staticdefs = CORD_all( env->code->staticdefs, "static ", compile_type(env, t), " $", decl_name, " = ", compile(env, decl->value), ";\n"); - } else if (decl->value->tag == Use) { - assert(compile_statement(env, stmt->ast) == CORD_EMPTY); } else { env->code->fndefs = CORD_all( env->code->fndefs, |
