procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(count_markers): New function.

Browse source
This commit is contained in:
Richard M. Stallman 2002-04-13 17:47:20 +00:00
parent adb63af12a
commit 59d3606667
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
src/marker.c
View file

@ -888,6 +888,23 @@ DEFUN ("buffer-has-markers-at", Fbuffer_has_markers_at, Sbuffer_has_markers_at,
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 ()