github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-02-19 05:47:19 +00:00
Code Issues Projects Releases Wiki Activity

Avoid type conversion from float to double implied by comparison to double 0.0 constant

Browse Source
This commit is contained in:
Nick Briggs
2023-01-08 22:14:24 -08:00
parent f51d269b1e
commit ddc09e09ba
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/eqf.c
View File

@@ -283,7 +283,7 @@ checkfloats:
N_MakeFloat(arg1, f1, arg2);
N_MakeFloat(arg2, f2, arg2);
if (f1 == f2) return (ATOM_T);
if ((f1 == -0.0) && (f2 == 0.0)) return (ATOM_T);
if ((f1 == 0.0) && (f2 == -0.0)) return (ATOM_T);
if ((f1 == -0.0f) && (f2 == 0.0f)) return (ATOM_T);
if ((f1 == 0.0f) && (f2 == -0.0f)) return (ATOM_T);
return (NIL);
} /* end N_OP_eqq() */