diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-10-14 06:45:27 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-10-14 06:45:27 +0200 |
commit | a825e81ef70b0594dce00f08b573549e02a16932 (patch) | |
tree | 43958a239f4837811bfe7c9168b3f034f909acac | |
parent | 3086757966ec3b06af7ac1fcd9914ebbc6459c4c (diff) | |
download | ghdl-a825e81ef70b0594dce00f08b573549e02a16932.tar.gz ghdl-a825e81ef70b0594dce00f08b573549e02a16932.tar.bz2 ghdl-a825e81ef70b0594dce00f08b573549e02a16932.zip |
synth: handle record conversion
-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; |