diff options
| -rw-r--r-- | src/synth/synth-vhdl_expr.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/synth-vhdl_expr.adb b/src/synth/synth-vhdl_expr.adb index 1f78a9677..036e5a27e 100644 --- a/src/synth/synth-vhdl_expr.adb +++ b/src/synth/synth-vhdl_expr.adb @@ -1454,6 +1454,9 @@ package body Synth.Vhdl_Expr is when Type_Bit | Type_Logic => return Val; + when Type_Record + | Type_Unbounded_Record => + return Val; when others => Error_Msg_Synth (Syn_Inst, Loc, "unhandled type conversion"); return No_Valtyp; |