From 7d7b759c56476f4fee5f42b9086a292ac3956f55 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 12 Jan 2020 15:32:58 +0100 Subject: netlists-disp_vhdl: handle const_log for disp_memory. --- src/synth/netlists-disp_vhdl.adb | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'src/synth/netlists-disp_vhdl.adb') diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb index cf138b6d5..121016cac 100644 --- a/src/synth/netlists-disp_vhdl.adb +++ b/src/synth/netlists-disp_vhdl.adb @@ -379,6 +379,11 @@ package body Netlists.Disp_Vhdl is Zx := 0; Val := Get_Param_Uns32 (Inst, Param_Idx (Off / 32)); Val := Shift_Right (Val, Natural (Off mod 32)) and 1; + when Id_Const_Log => + Zx := Get_Param_Uns32 (Inst, 2 * Param_Idx (Off / 32) + 1); + Zx := Shift_Right (Zx, Natural (Off mod 32)) and 1; + Val := Get_Param_Uns32 (Inst, 2 * Param_Idx (Off / 32)); + Val := Shift_Right (Val, Natural (Off mod 32)) and 1; when Id_Const_UB32 => Zx := 0; if Off < 32 then -- cgit v1.2.3