[Emacs-diffs] Changes to emacs/src/marker.c

[Richard M. Stallman]

Index: emacs/src/marker.c
diff -c emacs/src/marker.c:1.36 emacs/src/marker.c:1.37
*** emacs/src/marker.c:1.36     Mon Apr  1 18:07:40 2002
--- emacs/src/marker.c  Sat Apr 13 13:47:20 2002
***************
*** 888,893 ****
--- 888,910 ----
  
    return Qnil;
  }
+ 
+ /* For debugging -- count the markers in buffer BUF.  */
+ 
+ int
+ count_markers (buf)
+      struct buffer *buf;
+ {
+   int total = 0;
+   Lisp_Object tail;
+ 
+   for (tail = BUF_MARKERS (buf);
+        !NILP (tail);
+        tail = XMARKER (tail)->chain)
+     total++;
+ 
+   return total;
+ }
  
  void
  syms_of_marker ()