aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-vhdl_expr.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-06-04 09:13:38 +0200
committerTristan Gingold <tgingold@free.fr>2022-06-04 16:27:50 +0200
commit3b4ef2e843e7bead1f05a2045627583916807374 (patch)
treee75a1eaf4c4746673a9d3b248f14cf5f3ae09696 /src/synth/synth-vhdl_expr.adb
parent0b9d3bd73f2e91efdbf5e491f0cfe6ca984e50a5 (diff)
downloadghdl-3b4ef2e843e7bead1f05a2045627583916807374.tar.gz
ghdl-3b4ef2e843e7bead1f05a2045627583916807374.tar.bz2
ghdl-3b4ef2e843e7bead1f05a2045627583916807374.zip
synth-vhdl_expr: do not abort on array subtype conversion
Diffstat (limited to 'src/synth/synth-vhdl_expr.adb')
-rw-r--r--src/synth/synth-vhdl_expr.adb3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/synth-vhdl_expr.adb b/src/synth/synth-vhdl_expr.adb
index b8b6b44fa..d58399021 100644
--- a/src/synth/synth-vhdl_expr.adb
+++ b/src/synth/synth-vhdl_expr.adb
@@ -1432,6 +1432,9 @@ package body Synth.Vhdl_Expr is
when Type_Vector
| Type_Unbounded_Vector =>
return Val;
+ when Type_Array
+ | Type_Unbounded_Array =>
+ return Val;
when others =>
Error_Msg_Synth
(+Conv, "unhandled type conversion (to array)");