diff options
| -rw-r--r-- | src/vhdl/translate/trans-chap3.adb | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/src/vhdl/translate/trans-chap3.adb b/src/vhdl/translate/trans-chap3.adb index d1ce7464f..4457403ec 100644 --- a/src/vhdl/translate/trans-chap3.adb +++ b/src/vhdl/translate/trans-chap3.adb @@ -1939,16 +1939,8 @@ package body Trans.Chap3 is end if; end; when Type_Mode_F64 => - declare - V : Iir_Fp64; - begin - V := Get_Fp_Value (Lit); - if Is_Hi then - return V = Iir_Fp64'Last; - else - return V = Iir_Fp64'First; - end if; - end; + -- Don't include +/- Inf + return False; when others => Error_Kind ("is_equal_limit " & Type_Mode_Type'Image (Mode), Lit); |