From 1712663b4188780ed2fd774d4d348fcc52b8f009 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Mon, 9 Mar 2020 20:41:42 +0100 Subject: synth-static_oper: generalize "not". --- src/synth/synth-static_oper.adb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/synth/synth-static_oper.adb b/src/synth/synth-static_oper.adb index 504110072..04be4d246 100644 --- a/src/synth/synth-static_oper.adb +++ b/src/synth/synth-static_oper.adb @@ -684,7 +684,8 @@ package body Synth.Static_Oper is when Iir_Predefined_Ieee_1164_Scalar_Not => return Create_Value_Discrete - (Std_Ulogic'Pos (Not_Table (Std_Ulogic'Val (Operand.Scal))), + (Std_Ulogic'Pos + (Not_Table (Std_Ulogic'Val (Get_Static_Discrete (Operand)))), Oper_Typ); when Iir_Predefined_Ieee_1164_Vector_Or_Reduce => -- cgit v1.2.3