From 519418b37a65db6064cb624ec034cb80fb709fe4 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Fri, 10 Nov 1995 15:56:08 +0000
Subject: [PATCH] (oblookup): Clear ARRAY_MARK_FLAG in obsize.

---
 src/lread.c | 2 ++
 1 file changed, 2 insertions(+)

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;
-- 
2.39.2