# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1056669308 0
# Node ID 7181f5ced81c49d71ad5bd35adff5595045ef0d3
# Parent  c1f65dfc56ebe104e156c4ee1d98f7cbbae84572
(unchain_marker): Lisp_Object arg => Lisp_Marker.
(struct Lisp_Marker): Lisp_Object `chain' => Lisp_Marker `next'.

diff -r c1f65dfc56eb -r 7181f5ced81c src/lisp.h
--- a/src/lisp.h	Thu Jun 26 21:18:45 2003 +0000
+++ b/src/lisp.h	Thu Jun 26 23:15:08 2003 +0000
@@ -1115,7 +1115,7 @@
 
   /* For markers that point somewhere,
      this is used to chain of all the markers in a given buffer.  */
-  Lisp_Object chain;
+  struct Lisp_Marker *next;
   /* This is the char position where the marker points.  */
   int charpos;
   /* This is the byte position.  */
@@ -2741,7 +2741,7 @@
 extern int charpos_to_bytepos P_ ((int));
 extern int buf_charpos_to_bytepos P_ ((struct buffer *, int));
 extern int buf_bytepos_to_charpos P_ ((struct buffer *, int));
-extern void unchain_marker P_ ((Lisp_Object));
+extern void unchain_marker P_ ((struct Lisp_Marker *marker));
 extern Lisp_Object set_marker_restricted P_ ((Lisp_Object, Lisp_Object, Lisp_Object));
 extern Lisp_Object set_marker_both P_ ((Lisp_Object, Lisp_Object, int, int));
 extern Lisp_Object set_marker_restricted_both P_ ((Lisp_Object, Lisp_Object,