diff options
Diffstat (limited to 'src/synth/synth-aggr.adb')
-rw-r--r-- | src/synth/synth-aggr.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-aggr.adb b/src/synth/synth-aggr.adb index 2ec210ca5..f7cd5278d 100644 --- a/src/synth/synth-aggr.adb +++ b/src/synth/synth-aggr.adb @@ -488,7 +488,8 @@ package body Synth.Aggr is when Type_Vector | Type_Array => return Synth_Aggregate_Array (Syn_Inst, Aggr, En, Aggr_Type); - when Type_Record => + when Type_Record + | Type_Unbounded_Record => return Synth_Aggregate_Record (Syn_Inst, Aggr, En, Aggr_Type); when others => raise Internal_Error; |