aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2017-10-24 19:19:25 +0200
committerTristan Gingold <tgingold@free.fr>2017-10-24 19:19:25 +0200
commit91f9de47026f17a105f8cd90ead87b79cf2aa63c (patch)
tree3eaccdff62b9e2a2102f2fef8f454c1ed699ee37 /src/vhdl
parent1da2fc31b3c4427c96df5972a270334ed1340b84 (diff)
downloadghdl-91f9de47026f17a105f8cd90ead87b79cf2aa63c.tar.gz
ghdl-91f9de47026f17a105f8cd90ead87b79cf2aa63c.tar.bz2
ghdl-91f9de47026f17a105f8cd90ead87b79cf2aa63c.zip
sem_types: set record element position when creating subtype.
Diffstat (limited to 'src/vhdl')
-rw-r--r--src/vhdl/sem_types.adb1
1 files changed, 1 insertions, 0 deletions
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;