diff options
| author | Ginger Bill <bill@gingerbill.org> | 2017-09-30 11:28:17 +0100 |
|---|---|---|
| committer | Ginger Bill <bill@gingerbill.org> | 2017-09-30 11:28:17 +0100 |
| commit | 5259de58722ed8e32f20c9c859b3d9fac8a526a3 (patch) | |
| tree | 9d1ef86ccf9ad279fcbbbd8a59b5efb4160bdb15 | |
| parent | e2b9c87aa888da76d6bd366fd99d0c8d2d99e756 (diff) | |
Reserve the link_name `main`
| -rw-r--r-- | src/check_decl.cpp | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/check_decl.cpp b/src/check_decl.cpp index 331225d86..2ef825083 100644 --- a/src/check_decl.cpp +++ b/src/check_decl.cpp @@ -525,6 +525,8 @@ void check_proc_decl(Checker *c, Entity *e, DeclInfo *d) { "\tat %.*s(%td:%td)", LIT(name), LIT(pos.file), pos.line, pos.column); } + } else if (name == "main") { + error(d->proc_lit, "The link name `main` is reserved for internal use"); } else { map_set(fp, key, e); } @@ -549,6 +551,8 @@ void check_proc_decl(Checker *c, Entity *e, DeclInfo *d) { "Non unique linking name for procedure `%.*s`\n" "\tother at %.*s(%td:%td)", LIT(name), LIT(pos.file), pos.line, pos.column); + } else if (name == "main") { + error(d->proc_lit, "The link name `main` is reserved for internal use"); } else { map_set(fp, key, e); } |