From 5837c03fe6704eff8ba531aafecfd7323ff353c8 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sat, 28 Mar 2020 17:18:13 +0100 Subject: synth-static_oper: add more operation. --- src/synth/synth-static_oper.adb | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'src') diff --git a/src/synth/synth-static_oper.adb b/src/synth/synth-static_oper.adb index 73db0d9f7..5e22fabeb 100644 --- a/src/synth/synth-static_oper.adb +++ b/src/synth/synth-static_oper.adb @@ -782,6 +782,14 @@ package body Synth.Static_Oper is (Left, Right, Compare_Greater, Expr) = Compare_Equal; return Create_Value_Discrete (Boolean'Pos (Res), Res_Typ); end; + when Iir_Predefined_Ieee_Numeric_Std_Eq_Uns_Nat => + declare + Res : Boolean; + begin + Res := Synth_Compare_Uns_Nat + (Left, Right, Compare_Greater, Expr) = Compare_Equal; + return Create_Value_Discrete (Boolean'Pos (Res), Res_Typ); + end; when Iir_Predefined_Ieee_Numeric_Std_Gt_Uns_Uns => declare -- cgit v1.2.3