From 1da2fc31b3c4427c96df5972a270334ed1340b84 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 24 Oct 2017 19:19:02 +0200
Subject: sem_names: set location on signal attribute.

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

diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb
index 5b3baf7cc..7e1161e06 100644
--- a/src/vhdl/sem_names.adb
+++ b/src/vhdl/sem_names.adb
@@ -3272,6 +3272,7 @@ package body Sem_Names is
    begin
       Prefix := Get_Named_Entity (Get_Prefix (Attr));
       Res := Create_Iir (Kind);
+      Location_Copy (Res, Attr);
       if Kind = Iir_Kind_Delayed_Attribute then
          Set_Type (Res, Get_Type (Prefix));
       elsif Kind = Iir_Kind_Transaction_Attribute then
-- 
cgit v1.2.3