diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-07-09 06:47:55 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-07-18 19:19:57 +0200 |
commit | 1fda27561ab480e690a199ecda4f79d2f36b1f7d (patch) | |
tree | 9051a5cd0fb9aeb06940e54136bfe3a0449b96c9 /src | |
parent | 297b0581e0e629602234f0bb0cbcbd435d813192 (diff) | |
download | ghdl-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.adb | 1 |
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 |