Commit 4f5c4403 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(map_obarray): Don't crash if something strange is in the obarray.

parent 0e193890
...@@ -2248,7 +2248,7 @@ map_obarray (obarray, fn, arg) ...@@ -2248,7 +2248,7 @@ map_obarray (obarray, fn, arg)
for (i = XVECTOR (obarray)->size - 1; i >= 0; i--) for (i = XVECTOR (obarray)->size - 1; i >= 0; i--)
{ {
tail = XVECTOR (obarray)->contents[i]; tail = XVECTOR (obarray)->contents[i];
if (XFASTINT (tail) != 0) if (SYMBOLP (tail))
while (1) while (1)
{ {
(*fn) (tail, arg); (*fn) (tail, arg);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment