diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-02-25 20:24:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-02-25 20:24:25 +0000 |
| commit | d393c06819d87fd26ad13768230895c5ec5100ee (patch) | |
| tree | 1566a2d98b10d2d8fe63e0b7a78a61187d561c45 /src/alloc.c | |
| parent | ec367ad6e6a4196f9fa431b799e855c57f8896ec (diff) | |
| download | emacs-d393c06819d87fd26ad13768230895c5ec5100ee.tar.gz emacs-d393c06819d87fd26ad13768230895c5ec5100ee.tar.bz2 emacs-d393c06819d87fd26ad13768230895c5ec5100ee.zip | |
(mark_interval): Add ignored arg.
(mark_interval_tree): Pass new arg to traverse_intervals.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/alloc.c b/src/alloc.c index 476ca817ba8..ef8850270d3 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -248,8 +248,9 @@ static int total_free_intervals, total_intervals; /* 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 @@ mark_interval_tree (tree) 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) \ |