From 1fda27561ab480e690a199ecda4f79d2f36b1f7d Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Thu, 9 Jul 2020 06:47:55 +0200 Subject: vhdl: add missing xrefs for record subtype indications --- src/vhdl/vhdl-sem_types.adb | 1 + 1 file changed, 1 insertion(+) 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 -- cgit v1.2.3