From ddc09e09ba1d26ed6816785188735e4a08187a96 Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Sun, 8 Jan 2023 22:14:24 -0800
Subject: [PATCH] Avoid type conversion from float to double implied by
 comparison to double 0.0 constant

---
 src/eqf.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/eqf.c b/src/eqf.c
index 55e1eaf..da678e1 100644
--- a/src/eqf.c
+++ b/src/eqf.c
@@ -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() */