From 31ef7f7a892bab02b43b61b5b3a858dcf61cdeb9 Mon Sep 17 00:00:00 2001
From: Jim Blandy <jimb@redhat.com>
Date: Tue, 26 Jan 1993 03:05:54 +0000
Subject: [PATCH] * fns.c (internal_equal): Protect the clause for comparing
 numbers 	of different tpes with a "#ifdef LISP_FLOAT_TYPE".

---
 src/fns.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/fns.c b/src/fns.c
index 9f818e886f..a67635a249 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -837,10 +837,12 @@ internal_equal (o1, o2, depth)
 do_cdr:
   QUIT;
   if (EQ (o1, o2)) return Qt;
+#ifdef LISP_FLOAT_TYPE
   if (NUMBERP (o1) && NUMBERP (o2))
     {
       return (extract_float (o1) == extract_float (o2)) ? Qt : Qnil;
     }
+#endif
   if (XTYPE (o1) != XTYPE (o2)) return Qnil;
   if (XTYPE (o1) == Lisp_Cons)
     {
-- 
2.20.1