From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 10 Nov 1995 15:56:08 +0000 (+0000)
Subject: (oblookup): Clear ARRAY_MARK_FLAG in obsize.
X-Git-Tag: emacs-19.34~2405
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=519418b37a65db6064cb624ec034cb80fb709fe4;p=emacs.git

(oblookup): Clear ARRAY_MARK_FLAG in obsize.
---

diff --git a/src/lread.c b/src/lread.c
index c1de692edfd..67d2b7fee21 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1961,6 +1961,8 @@ oblookup (obarray, ptr, size)
       obarray = check_obarray (obarray);
       obsize = XVECTOR (obarray)->size;
     }
+  /* This is sometimes needed in the middle of GC.  */
+  obsize &= ~ARRAY_MARK_FLAG;
   /* Combining next two lines breaks VMS C 2.3.  */
   hash = hash_string (ptr, size);
   hash %= obsize;