diff options
author | Tristan Gingold <tgingold@free.fr> | 2018-12-07 05:23:57 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2018-12-07 05:23:57 +0100 |
commit | 606d84285a70c64d1eb57d9e4f908e986cd2b287 (patch) | |
tree | f6863fdb62391d7e91c0f4d21f8a67d28c34523d /src/vhdl/translate/trans-chap4.adb | |
parent | 3276b70eb3495f9ec871ba65003315acd499af5a (diff) | |
download | ghdl-606d84285a70c64d1eb57d9e4f908e986cd2b287.tar.gz ghdl-606d84285a70c64d1eb57d9e4f908e986cd2b287.tar.bz2 ghdl-606d84285a70c64d1eb57d9e4f908e986cd2b287.zip |
translate: renaming, support constrained unbounded record aggregates.
Diffstat (limited to 'src/vhdl/translate/trans-chap4.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap4.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap4.adb b/src/vhdl/translate/trans-chap4.adb index 675dc3d62..7b8312290 100644 --- a/src/vhdl/translate/trans-chap4.adb +++ b/src/vhdl/translate/trans-chap4.adb @@ -548,7 +548,7 @@ package body Trans.Chap4 is declare Aggr_Type : constant Iir := Get_Type (Value); begin - Chap3.Create_Array_Subtype (Aggr_Type); + Chap3.Create_Composite_Subtype (Aggr_Type); Name_Node := Stabilize (Name); if Alloc_Kind = Alloc_Stack then -- Short-cut: don't allocate bounds. |