From 6c6eb10a9c547ae9ba286aaa686e518b55a9a994 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 4 Feb 2020 19:02:08 +0100
Subject: vhdl-sem: improve error location for unknown entity.

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

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb
index 4ce298b40..8a54f2e5e 100644
--- a/src/vhdl/vhdl-sem.adb
+++ b/src/vhdl/vhdl-sem.adb
@@ -122,7 +122,7 @@ package body Vhdl.Sem is
          Entity := Load_Primary_Unit
            (Library, Get_Identifier (Name), Library_Unit);
          if Entity = Null_Iir then
-            Error_Msg_Sem (+Library_Unit, "entity %n was not analysed", +Name);
+            Error_Msg_Sem (+Name, "entity %n was not analysed", +Name);
             return Null_Iir;
          end if;
          Entity := Get_Library_Unit (Entity);
-- 
cgit v1.2.3