From 76e2f6b335b8fbc5c44b5b166653b096f8c3ee57 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 4 Feb 2020 19:03:22 +0100
Subject: vhdl-sem_names: improve error location.

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

(limited to 'src')

diff --git a/src/vhdl/vhdl-sem_names.adb b/src/vhdl/vhdl-sem_names.adb
index f632b614e..b02fdedd4 100644
--- a/src/vhdl/vhdl-sem_names.adb
+++ b/src/vhdl/vhdl-sem_names.adb
@@ -4814,7 +4814,7 @@ package body Vhdl.Sem_Names is
             --  A message must have been displayed.
             return Name;
          when Iir_Kind_Overload_List =>
-            Error_Overload (Res);
+            Error_Overload (Name);
             Set_Named_Entity (Name, Create_Error_Name (Name));
             return Name;
          when Iir_Kinds_Concurrent_Statement
-- 
cgit v1.2.3