diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-03-15 21:01:20 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-03-15 21:01:20 +0100 |
| commit | 1ea2bc4ab4ae43273094dc798244fc864d2d6198 (patch) | |
| tree | 2ad094ef67e703523ba62b356e45f1ada9e5a654 /src/vhdl | |
| parent | 46c50154d351a1c01c26316d2589236a20a39405 (diff) | |
| download | ghdl-1ea2bc4ab4ae43273094dc798244fc864d2d6198.tar.gz ghdl-1ea2bc4ab4ae43273094dc798244fc864d2d6198.tar.bz2 ghdl-1ea2bc4ab4ae43273094dc798244fc864d2d6198.zip | |
Avoid cascaded error messages.
Diffstat (limited to 'src/vhdl')
| -rw-r--r-- | src/vhdl/sem_assocs.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_assocs.adb b/src/vhdl/sem_assocs.adb index 6bbc67215..bafea5496 100644 --- a/src/vhdl/sem_assocs.adb +++ b/src/vhdl/sem_assocs.adb @@ -1854,7 +1854,7 @@ package body Sem_Assocs is end if; if Match = Not_Compatible then - if Finish then + if Finish and then not Is_Error (Actual) then Error_Msg_Sem (+Assoc, "can't associate %n with %n", (+Actual, +Inter), Cont => True); Error_Msg_Sem |