aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2020-07-09 06:47:55 +0200
committerTristan Gingold <tgingold@free.fr>2020-07-18 19:19:57 +0200
commit1fda27561ab480e690a199ecda4f79d2f36b1f7d (patch)
tree9051a5cd0fb9aeb06940e54136bfe3a0449b96c9 /src
parent297b0581e0e629602234f0bb0cbcbd435d813192 (diff)
downloadghdl-1fda27561ab480e690a199ecda4f79d2f36b1f7d.tar.gz
ghdl-1fda27561ab480e690a199ecda4f79d2f36b1f7d.tar.bz2
ghdl-1fda27561ab480e690a199ecda4f79d2f36b1f7d.zip
vhdl: add missing xrefs for record subtype indications
Diffstat (limited to 'src')
-rw-r--r--src/vhdl/vhdl-sem_types.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_types.adb b/src/vhdl/vhdl-sem_types.adb
index 7a59f53b1..759e0af3f 100644
--- a/src/vhdl/vhdl-sem_types.adb
+++ b/src/vhdl/vhdl-sem_types.adb
@@ -2071,6 +2071,7 @@ package body Vhdl.Sem_Types is
Set_Parent (El, Res);
Append_Owned_Element_Constraint (Res, El);
end if;
+ Xref_Ref (El, Tm_El);
El_Type := Get_Type (El);
Tm_El_Type := Get_Type (Tm_El);
if Get_Kind (El_Type) = Iir_Kind_Parenthesis_Name then