changeset 1957:54c8c66cd9ac

(mark_interval): Add ignored arg. (mark_interval_tree): Pass new arg to traverse_intervals.
author Richard M. Stallman <rms@gnu.org>
date Thu, 25 Feb 1993 20:24:25 +0000
parents 02bb7721b67c
children 8bc716df45e3
files src/alloc.c
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/alloc.c	Thu Feb 25 20:23:59 1993 +0000
+++ b/src/alloc.c	Thu Feb 25 20:24:25 1993 +0000
@@ -248,8 +248,9 @@
 /* Mark the pointers of one interval. */
 
 static void
-mark_interval (i)
+mark_interval (i, dummy)
      register INTERVAL i;
+     Lisp_Object dummy;
 {
   if (XMARKBIT (i->plist))
     abort ();
@@ -264,7 +265,7 @@
   if (XMARKBIT (tree->plist))
     return;
 
-  traverse_intervals (tree, 1, 0, mark_interval);
+  traverse_intervals (tree, 1, 0, mark_interval, Qnil);
 }
 
 #define MARK_INTERVAL_TREE(i) \