Add extra check for bodiless procedures

This commit is contained in:
Ginger Bill
2017-06-15 21:36:29 +01:00
parent 1851674b50
commit 3fa398ec43
2 changed files with 4 additions and 7 deletions

View File

@@ -362,6 +362,8 @@ void check_proc_decl(Checker *c, Entity *e, DeclInfo *d) {
GB_ASSERT(pd->body->kind == AstNode_BlockStmt);
check_procedure_later(c, c->curr_ast_file, e->token, d, proc_type, pd->body, pd->tags);
} else if (!is_foreign) {
error(e->token, "Only a foreign procedure cannot have a body");
}
if (pt->result_count == 0 && is_require_results) {