From 606d84285a70c64d1eb57d9e4f908e986cd2b287 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 7 Dec 2018 05:23:57 +0100 Subject: translate: renaming, support constrained unbounded record aggregates. --- src/vhdl/translate/trans-chap3.adb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/vhdl/translate/trans-chap3.adb') diff --git a/src/vhdl/translate/trans-chap3.adb b/src/vhdl/translate/trans-chap3.adb index e10e2c2f2..c9b5c9ffb 100644 --- a/src/vhdl/translate/trans-chap3.adb +++ b/src/vhdl/translate/trans-chap3.adb @@ -3107,7 +3107,7 @@ package body Trans.Chap3 is Chap3.Elab_Composite_Subtype_Layout (Arr_Type); end Elab_Array_Subtype; - procedure Create_Array_Subtype (Sub_Type : Iir) + procedure Create_Composite_Subtype (Sub_Type : Iir) is Mark : Id_Mark_Type; begin @@ -3120,7 +3120,7 @@ package body Trans.Chap3 is -- Force creation of variables. Chap3.Create_Composite_Subtype_Layout_Var (Sub_Type, True); Pop_Identifier_Prefix (Mark); - end Create_Array_Subtype; + end Create_Composite_Subtype; -- Copy SRC to DEST. -- Both have the same type, OTYPE. -- cgit v1.2.3