From 90ee44ed04d375935e66d74938a630ccb490649f Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 31 Mar 2020 18:27:57 +0200
Subject: vhdl-sem_assocs: report all errors on incorrect formals.

---
 src/vhdl/vhdl-sem_assocs.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/vhdl/vhdl-sem_assocs.adb b/src/vhdl/vhdl-sem_assocs.adb
index 53d50e65f..79ce1c151 100644
--- a/src/vhdl/vhdl-sem_assocs.adb
+++ b/src/vhdl/vhdl-sem_assocs.adb
@@ -2338,7 +2338,7 @@ package body Vhdl.Sem_Assocs is
             Formal_Name := Get_Named_Entity (Formal);
             if Is_Error (Formal_Name) then
                Match := Not_Compatible;
-               exit;
+               --  Continue analysis in order to catch more errors.
             end if;
 
             Assoc := Get_Chain (Assoc);
-- 
cgit v1.2.3