Mercurial > emacs

diff src/lread.c @ 21982:456f95c03285

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fintern): Properly compare lisp objects.
author Richard M. Stallman <rms@gnu.org>
date Thu, 07 May 1998 20:48:17 +0000
parents 6635a9f225a9
children cbec85828fad
line wrap: on
line diff
--- a/src/lread.c	Thu May 07 20:47:53 1998 +0000
+++ b/src/lread.c	Thu May 07 20:48:17 1998 +0000
@@ -2320,7 +2320,7 @@
   XSYMBOL (sym)->obarray = obarray;
 
   if ((XSTRING (string)->data[0] == ':')
-      && obarray == initial_obarray)
+      && EQ (obarray, initial_obarray))
     XSYMBOL (sym)->value = sym;
 
   ptr = &XVECTOR (obarray)->contents[XINT (tem)];