Mercurial > emacs

comparison src/alloc.c @ 13553:fb12156faaf5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mark_object): Don't overwrite original argument value.
author Richard M. Stallman <rms@gnu.org>
date Wed, 15 Nov 1995 17:42:44 +0000
parents 941c37982f37
children 8e82e46aa77b
comparison
equal deleted inserted replaced
13552:154408a17c77 13553:fb12156faaf5
1697 #define LAST_MARKED_SIZE 500 1697 #define LAST_MARKED_SIZE 500
1698 Lisp_Object *last_marked[LAST_MARKED_SIZE]; 1698 Lisp_Object *last_marked[LAST_MARKED_SIZE];
1699 int last_marked_index; 1699 int last_marked_index;
1700 1700
1701 static void 1701 static void
1702 mark_object (objptr) 1702 mark_object (argptr)
1703 Lisp_Object *objptr; 1703 Lisp_Object *argptr;
1704 { 1704 {
1705 Lisp_Object *objptr = argptr;
1705 register Lisp_Object obj; 1706 register Lisp_Object obj;
1706 1707
1707 loop: 1708 loop:
1708 obj = *objptr; 1709 obj = *objptr;
1709 loop2: 1710 loop2: