# HG changeset patch # User Richard M. Stallman # Date 816457364 0 # Node ID fb12156faaf5ee57adfc2e55ce8a0f50be4fb48e # Parent 154408a17c774f574d30bd8777a3ce682e4b1fb2 (mark_object): Don't overwrite original argument value. diff -r 154408a17c77 -r fb12156faaf5 src/alloc.c --- a/src/alloc.c Wed Nov 15 17:24:18 1995 +0000 +++ b/src/alloc.c Wed Nov 15 17:42:44 1995 +0000 @@ -1699,9 +1699,10 @@ int last_marked_index; static void -mark_object (objptr) - Lisp_Object *objptr; +mark_object (argptr) + Lisp_Object *argptr; { + Lisp_Object *objptr = argptr; register Lisp_Object obj; loop: