aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/vhdl/sem_assocs.adb3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/sem_assocs.adb b/src/vhdl/sem_assocs.adb
index 9b1c18047..961ec3c5f 100644
--- a/src/vhdl/sem_assocs.adb
+++ b/src/vhdl/sem_assocs.adb
@@ -2309,8 +2309,7 @@ package body Sem_Assocs is
or else Get_Parent (Inter) /= Get_Parent (Interface_Chain)
then
if Finish then
- Error_Msg_Sem
- (+Assoc, "formal %i is not an interface name", +Inter);
+ Error_Msg_Sem (+Assoc, "formal is not an interface name");
end if;
Match := Not_Compatible;
exit;