aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-10-13 18:52:13 +0200
committerTristan Gingold <tgingold@free.fr>2019-10-13 18:54:25 +0200
commit50bf82973c96b5518f66c0844ce520f5834a0976 (patch)
treeed1e91c343246dc8dc88c753845d6578aeaf1adb /src/synth
parent6b4f4c01a59a4d7f5bd8081022b68a6f69c81aa8 (diff)
downloadghdl-50bf82973c96b5518f66c0844ce520f5834a0976.tar.gz
ghdl-50bf82973c96b5518f66c0844ce520f5834a0976.tar.bz2
ghdl-50bf82973c96b5518f66c0844ce520f5834a0976.zip
synth-stmts: handle const indexed array.
Diffstat (limited to 'src/synth')
-rw-r--r--src/synth/synth-stmts.adb5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb
index 50a1c70a8..8297e5242 100644
--- a/src/synth/synth-stmts.adb
+++ b/src/synth/synth-stmts.adb
@@ -179,6 +179,11 @@ package body Synth.Stmts is
Dest_Voff := Build_Addidx
(Get_Build (Syn_Inst), Dest_Voff, Voff);
end if;
+ elsif Dest_Obj.Kind = Value_Const_Array then
+ Dest_Obj := Dest_Obj.Arr.V
+ (Iir_Index32 ((Dest_W - Dest_Off) / W));
+ Dest_Off := 0;
+ Dest_W := W;
end if;
end;