Passing arrays as arguments to functions working

This commit is contained in:
Krzosa Karol
2022-06-07 21:34:02 +02:00
parent b65a5f78bf
commit 5744da8899
4 changed files with 57 additions and 54 deletions

View File

@@ -2,6 +2,7 @@
#define gen(...) pctx->gen.addf(__VA_ARGS__)
#define genln(...) do{gen("\n"); gen_indent(); gen(__VA_ARGS__); }while(0)
global S32 global_indent;
global S32 is_inside_struct;
function void
gen_indent(){
@@ -253,6 +254,40 @@ gen_block(Ast_Block *block){
genln("}");
}
enum {
ALWAYS_EMIT_VALUE = 0,
DONT_EMIT_VALUE = 1,
};
function void
gen_var(Intern_String name, Ast_Resolved_Type *type, Ast_Expr *expr, B32 emit_value){
if(is_array(type)){
gen("Slice %s", name.str);
} else{
gen_simple_decl(type, name);
}
if(emit_value == DONT_EMIT_VALUE){
return;
}
if(expr){
gen(" = ");
gen_expr(expr);
} else if(is_array(type)){
gen(" = (Slice){%d, (", type->arr.size);
gen_simple_decl(type, {});
gen("){}");
gen("}");
} else { // Default zero
if(is_numeric(type)){
gen(" = 0");
} else {
gen(" = {}");
}
}
}
function void
gen_ast(Ast *ast){
switch(ast->kind){
@@ -280,24 +315,7 @@ gen_ast(Ast *ast){
CASE(VAR, Var){
Sym *sym = resolved_get(node);
if(is_array(sym->type)){
gen("Slice %s", node->name.str);
} else{
gen_simple_decl(sym->type, node->name);
}
if(node->expr){
gen(" = ");
gen_expr(node->expr);
} else if(is_array(sym->type)){
gen(" = (Slice){%d, (", sym->type->arr.size);
gen_simple_decl(sym->type, {});
gen("){}");
gen("}");
} else { // Default zero
gen(" = {}");
}
gen_var(sym->name, sym->type, node->expr, is_inside_struct ? DONT_EMIT_VALUE : ALWAYS_EMIT_VALUE);
gen(";");
BREAK();
}
@@ -381,7 +399,7 @@ gen_ast(Ast *ast){
For(lambda->args){
assert(it->kind == AST_LAMBDA_ARG);
Ast_Resolved_Type *type = resolved_type_get(it->typespec);
gen_simple_decl(type, it->name);
gen_var(it->name, type, 0, DONT_EMIT_VALUE);
if(&it != (lambda->args.end() - 1)) gen(", ");
}
gen(")");
@@ -405,6 +423,7 @@ gen_ast(Ast *ast){
if(node->value->kind == AST_STRUCT){
gen("typedef struct %s{", node->name.str);
global_indent++;
is_inside_struct++;
For(agg->members){
genln("");
gen_ast(it);
@@ -414,6 +433,7 @@ gen_ast(Ast *ast){
genln("");
gen_ast(it);
}
is_inside_struct--;
global_indent--;
genln("}%s;", node->name.str);
}