From cbf6d4d125e7fbf0842dce4089083d0851adfb28 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 15 Oct 2017 07:33:08 +0200 Subject: Improve error message for uninstantiated component. --- src/vhdl/configuration.adb | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'src/vhdl') diff --git a/src/vhdl/configuration.adb b/src/vhdl/configuration.adb index 7a1ccfc7e..ae627ca2d 100644 --- a/src/vhdl/configuration.adb +++ b/src/vhdl/configuration.adb @@ -544,9 +544,11 @@ package body Configuration is if Bind = Null_Iir then if Is_Warning_Enabled (Warnid_Binding) then Inst := Get_First_Element (Get_Instantiation_List (Conf)); + Inst := Strip_Denoting_Name (Inst); Warning_Msg_Elab (Warnid_Binding, Conf, - "%n is not bound", +Inst, Cont => True); + "%n of %n is not bound", + (+Inst, +Get_Instantiated_Unit (Inst)), Cont => True); Warning_Msg_Elab (Warnid_Binding, Current_Configuration, "(in %n)", +Current_Configuration); -- cgit v1.2.3