Remove Lisp_Misc_Float

* src/data.c (Ftype_of): Do not worry about Lisp_Misc_Float.
* src/lisp.h (Lisp_Misc_Float): Remove.  This placeholder has been
unused for two decades; if we ever want to change floats to be a
misc type we can bring it back then.

diff --git a/src/data.c b/src/data.c
index e4e55290e62d1baae306b516451019ba665a0d00..559844b03fdd6d50f6b95ef02f996f787f5fb5f5 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -228,8 +228,6 @@ for example, (type-of 1) returns `integer'.  */)
          return Qmarker;
        case Lisp_Misc_Overlay:
          return Qoverlay;
-       case Lisp_Misc_Float:
-          return Qfloat;
         case Lisp_Misc_Finalizer:
           return Qfinalizer;
 #ifdef HAVE_MODULES

diff --git a/src/lisp.h b/src/lisp.h
index 900c7c5cc3f52364a3d35b90f62b4ee82ef32a96..ade188fd2091d0523a60d59bc3de471661c08db2 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -466,9 +466,6 @@ enum Lisp_Misc_Type
 #ifdef HAVE_MODULES
     Lisp_Misc_User_Ptr,
 #endif
-    /* Currently floats are not a misc type,
-       but let's define this in case we want to change that.  */
-    Lisp_Misc_Float,
     /* This is not a type code.  It is for range checking.  */
     Lisp_Misc_Limit
   };