1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_assocs.adb b/src/vhdl/vhdl-sem_assocs.adb
index 09ed67a85..230c8065a 100644
--- a/src/vhdl/vhdl-sem_assocs.adb
+++ b/src/vhdl/vhdl-sem_assocs.adb
@@ -2350,7 +2350,7 @@ package body Vhdl.Sem_Assocs is
                then
                   if Finish then
                      Error_Msg_Sem
-                       (+Assoc, "%n is not an interface name", +Inter);
+                       (+Formal, "%n is not an interface name", +Inter);
                   end if;
                   Match := Not_Compatible;
                   exit;