From db4cb5545b0d56dd022e07bf45a4bdfc84ea69ed Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 7 Jan 2005 09:08:19 +0000
Subject: [PATCH] * gc.c (mark_locations_array): avoid core dump with -O3.  
 [ruby-dev:25424]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7741 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 5 +++++
 gc.c      | 6 ++++--
 2 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 608c123282..f3f5a5c18c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Fri Jan  7 18:03:35 2005  Tanaka Akira  <akr@m17n.org>
+
+	* gc.c (mark_locations_array): avoid core dump with -O3.
+	  [ruby-dev:25424]
+
 Thu Jan  6 20:29:18 2005  NAKAMURA Usaku  <usa@ruby-lang.org>
 
 	* ext/zlib/zlib.c (zstream_end): should return value.
diff --git a/gc.c b/gc.c
index 169851f6d9..7aa42da67f 100644
--- a/gc.c
+++ b/gc.c
@@ -617,9 +617,11 @@ mark_locations_array(x, n)
     register VALUE *x;
     register long n;
 {
+    VALUE v;
     while (n--) {
-	if (is_pointer_to_heap((void *)*x)) {
-	    gc_mark(*x, 0);
+        v = *x;
+	if (is_pointer_to_heap((void *)v)) {
+	    gc_mark(v, 0);
 	}
 	x++;
     }