diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-03-21 08:24:53 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-03-21 08:24:53 +0100 |
| commit | 28cf5741ca6f6a83bc92fae63aa69ddabe9d5c0e (patch) | |
| tree | fe735f67af58753bb011491754d4f9ea1f31a0d5 | |
| parent | 79af4ca95f6887309bdcb21fece4704d6e1776c3 (diff) | |
| download | ghdl-28cf5741ca6f6a83bc92fae63aa69ddabe9d5c0e.tar.gz ghdl-28cf5741ca6f6a83bc92fae63aa69ddabe9d5c0e.tar.bz2 ghdl-28cf5741ca6f6a83bc92fae63aa69ddabe9d5c0e.zip | |
vhdl-sem_assocs: remove duplicate error message for non-existing interface.
| -rw-r--r-- | src/vhdl/vhdl-sem_assocs.adb | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/src/vhdl/vhdl-sem_assocs.adb b/src/vhdl/vhdl-sem_assocs.adb index d71e1f601..53d50e65f 100644 --- a/src/vhdl/vhdl-sem_assocs.adb +++ b/src/vhdl/vhdl-sem_assocs.adb @@ -2337,14 +2337,6 @@ package body Vhdl.Sem_Assocs is end if; Formal_Name := Get_Named_Entity (Formal); if Is_Error (Formal_Name) then - if Finish then - -- FIXME: display the name of subprg or component/entity. - -- FIXME: fetch the interface (for parenthesis_name). - -- FIXME: this is always a duplicate of a message from - -- Sem_Name. - Error_Msg_Sem (+Assoc, "no interface for %n in association", - +Get_Formal (Assoc)); - end if; Match := Not_Compatible; exit; end if; |