# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 781566291 0
# Node ID 32186e807f0295e45f37ab25a904872d4e88803b
# Parent  6061a432881f676b3cf0301e5df151d34d704a5b
(enum Lisp_Misc_Type): New type.
(struct Lisp_Marker): Add a member of that type.  Delete unused member
`modified'.

diff -r 6061a432881f -r 32186e807f02 src/lisp.h
--- a/src/lisp.h	Fri Oct 07 17:40:50 1994 +0000
+++ b/src/lisp.h	Fri Oct 07 21:44:51 1994 +0000
@@ -161,6 +161,13 @@
     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_Marker
   {
+    enum Lisp_Misc_Type type;	/* = Lisp_Misc_Marker */
     struct buffer *buffer;
     Lisp_Object chain;
     int bufpos;
-    int modified;
   };
 
 #ifdef LISP_FLOAT_TYPE