MEM_VECTOR_INIT(self, locals);
MEM_VECTOR_INIT(self, exprs);
+ MEM_VECTOR_INIT(self, collect);
return self;
}
MEM_VEC_FUNCTIONS(ast_block, ast_value*, locals)
MEM_VEC_FUNCTIONS(ast_block, ast_expression*, exprs)
+MEM_VEC_FUNCTIONS(ast_block, ast_expression*, collect)
+
+bool ast_block_collect(ast_block *self, ast_expression *expr)
+{
+ if (!ast_block_collect_add(self, expr))
+ return false;
+ expr->expression.node.keep = true;
+ return true;
+}
void ast_block_delete(ast_block *self)
{
for (i = 0; i < self->locals_count; ++i)
ast_delete(self->locals[i]);
MEM_VECTOR_CLEAR(self, locals);
+ for (i = 0; i < self->collect_count; ++i)
+ ast_delete(self->collect[i]);
+ MEM_VECTOR_CLEAR(self, collect);
ast_expression_delete((ast_expression*)self);
mem_d(self);
}
*out = ir_block_create_load_from_ent(func->curblock, ast_function_label(func, "efv"),
ent, field, self->expression.vtype);
}
- if (!*out)
+ if (!*out) {
+ asterror(ast_ctx(self), "failed to create %s instruction (output type %s)",
+ (lvalue ? "ADDRESS" : "FIELD"),
+ type_name[self->expression.vtype]);
return false;
+ }
if (lvalue)
self->expression.outl = *out;