Set procedure grouping type to t_invalid

This commit is contained in:
gingerBill
2017-12-06 11:01:52 +00:00
committed by GitHub
parent 991682e9fd
commit ba8371104d

View File

@@ -2261,7 +2261,7 @@ void check_collect_value_decl(Checker *c, AstNode *decl) {
d->type_expr = pl->type;
} else if (init->kind == AstNode_ProcGrouping) {
ast_node(pg, ProcGrouping, init);
e = make_entity_procedure_grouping(c->allocator, d->scope, token, nullptr);
e = make_entity_procedure_grouping(c->allocator, d->scope, token, t_invalid);
if (fl != nullptr) {
error(name, "Procedure groupings are not allowed within a foreign block");
}