Mercurial > emacs
comparison src/alloc.c @ 13553:fb12156faaf5
(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: |