diff options
| -rw-r--r-- | src/synth/synth-static_oper.adb | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/synth/synth-static_oper.adb b/src/synth/synth-static_oper.adb index 3a1c53ef4..7e5cb7a84 100644 --- a/src/synth/synth-static_oper.adb +++ b/src/synth/synth-static_oper.adb @@ -258,9 +258,14 @@ package body Synth.Static_Oper is return Create_Value_Discrete (Boolean'Pos (Left.Fp >= Right.Fp), Boolean_Type); + when Iir_Predefined_Floating_Plus => + return Create_Value_Float (Left.Fp + Right.Fp, Res_Typ); + when Iir_Predefined_Floating_Minus => + return Create_Value_Float (Left.Fp - Right.Fp, Res_Typ); + when Iir_Predefined_Floating_Mul => + return Create_Value_Float (Left.Fp * Right.Fp, Res_Typ); when Iir_Predefined_Floating_Div => - return Create_Value_Float - (Left.Fp / Right.Fp, Res_Typ); + return Create_Value_Float (Left.Fp / Right.Fp, Res_Typ); when Iir_Predefined_Array_Equality | Iir_Predefined_Record_Equality => |