From 91f9de47026f17a105f8cd90ead87b79cf2aa63c Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Tue, 24 Oct 2017 19:19:25 +0200 Subject: sem_types: set record element position when creating subtype. --- src/vhdl/sem_types.adb | 1 + 1 file changed, 1 insertion(+) (limited to 'src/vhdl') diff --git a/src/vhdl/sem_types.adb b/src/vhdl/sem_types.adb index b14a7010b..04cb74d47 100644 --- a/src/vhdl/sem_types.adb +++ b/src/vhdl/sem_types.adb @@ -1393,6 +1393,7 @@ package body Sem_Types is Set_Type (New_El, Get_Type (El)); Set_Base_Element_Declaration (New_El, Get_Base_Element_Declaration (El)); + Set_Element_Position (New_El, Get_Element_Position (El)); Append_Element (New_El_List, New_El); end loop; end Copy_Record_Elements_Declaration_List; -- cgit v1.2.3