aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-aggr.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-aggr.adb')
-rw-r--r--src/synth/synth-aggr.adb3
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;