HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
0e19389
)
(map_obarray): Don't crash if something strange is in the obarray.
author
Richard M. Stallman
<rms@gnu.org>
Mon, 28 Jul 1997 15:09:31 +0000
(15:09 +0000)
committer
Richard M. Stallman
<rms@gnu.org>
Mon, 28 Jul 1997 15:09:31 +0000
(15:09 +0000)
src/lread.c
patch
|
blob
|
blame
|
history
diff --git
a/src/lread.c
b/src/lread.c
index
7f718dc
..
60583ba
100644
(file)
--- a/
src/lread.c
+++ b/
src/lread.c
@@
-2248,7
+2248,7
@@
map_obarray (obarray, fn, arg)
for (i = XVECTOR (obarray)->size - 1; i >= 0; i--)
{
tail = XVECTOR (obarray)->contents[i];
- if (
XFASTINT (tail) != 0
)
+ if (
SYMBOLP (tail)
)
while (1)
{
(*fn) (tail, arg);