diff options
Diffstat (limited to 'src/vhdl/vhdl-sem_scopes.adb')
| -rw-r--r-- | src/vhdl/vhdl-sem_scopes.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_scopes.adb b/src/vhdl/vhdl-sem_scopes.adb index 0388faeb2..85e46000c 100644 --- a/src/vhdl/vhdl-sem_scopes.adb +++ b/src/vhdl/vhdl-sem_scopes.adb @@ -935,11 +935,13 @@ package body Vhdl.Sem_Scopes is -- declarative region must not be homographs, -- FIXME: unless one of them is the implicit declaration of a -- predefined operation. + Report_Start_Group; Error_Msg_Sem (+Decl, "identifier %i already used for a declaration", - (1 => +Ident), Cont => True); + +Ident); Error_Msg_Sem (+Current_Decl, "previous declaration: %n", +Current_Decl); + Report_End_Group; return; else -- Homograph, not in the same scope. |