From 1c4ca5a330e16e4a1cc43dcd5d1d8061923fdb32 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 7 Oct 1994 21:44:51 +0000
Subject: [PATCH] (enum Lisp_Misc_Type): New type. (struct Lisp_Marker): Add a
 member of that type.  Delete unused member `modified'.

---
 src/lisp.h | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/lisp.h b/src/lisp.h
index be0acf743f..c38b84205b 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -161,6 +161,13 @@ enum Lisp_Type
     Lisp_Overlay
   };
 
+/* This is the set of datatypes that share the marker structure.
+   The first member of the structure is a type code from this set.  */
+enum Lisp_Misc_Type
+  {
+    Lisp_Misc_Marker
+  };
+
 #ifndef NO_UNION_TYPE
 
 #ifndef WORDS_BIG_ENDIAN
@@ -571,10 +578,10 @@ struct Lisp_Subr
 
 struct Lisp_Marker
   {
+    enum Lisp_Misc_Type type;	/* = Lisp_Misc_Marker */
     struct buffer *buffer;
     Lisp_Object chain;
     int bufpos;
-    int modified;
   };
 
 #ifdef LISP_FLOAT_TYPE
-- 
2.20.1