From 436c581148833e54c3532d50b7770c94cc70d443 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Wed, 15 Nov 1995 17:42:44 +0000
Subject: [PATCH] (mark_object): Don't overwrite original argument value.

---
 src/alloc.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/alloc.c b/src/alloc.c
index 978174360b2..539539c49cd 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -1699,9 +1699,10 @@ Lisp_Object *last_marked[LAST_MARKED_SIZE];
 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:
-- 
2.11.4.GIT