diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-10-24 19:19:02 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-10-24 19:19:02 +0200 |
| commit | 1da2fc31b3c4427c96df5972a270334ed1340b84 (patch) | |
| tree | ccb27462d5a4f16da1c215c2659712581659f7d2 | |
| parent | a4c7b63f27c3151b3229444a75cedd0868455462 (diff) | |
| download | ghdl-1da2fc31b3c4427c96df5972a270334ed1340b84.tar.gz ghdl-1da2fc31b3c4427c96df5972a270334ed1340b84.tar.bz2 ghdl-1da2fc31b3c4427c96df5972a270334ed1340b84.zip | |
sem_names: set location on signal attribute.
| -rw-r--r-- | src/vhdl/sem_names.adb | 1 |
1 files changed, 1 insertions, 0 deletions
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 |