procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lread.c (Funintern): Error if symbol is t or nil.

Browse source
This commit is contained in:
Richard M. Stallman 2009-11-19 16:13:22 +00:00
parent 4265deabcb
commit 82c602f0fe
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/ChangeLog
View file

@ -1,3 +1,7 @@
2009-11-19 Richard Stallman <rms@gnu.org>
* lread.c (Funintern): Error if symbol is t or nil.
2009-11-19 Stefan Monnier <monnier@iro.umontreal.ca>
* insdel.c (make_gap_larger): Don't make as many assumptions about the

3
src/lread.c
View file

@ -3765,6 +3765,9 @@ OBARRAY defaults to the value of the variable `obarray'. */)
if (SYMBOLP (name) && !EQ (name, tem))
return Qnil;
if (EQ (tem, Qnil) || EQ (tem, Qt))
error ("Attempt to unintern t or nil");
XSYMBOL (tem)->interned = SYMBOL_UNINTERNED;
XSYMBOL (tem)->constant = 0;
XSYMBOL (tem)->indirect_variable = 0;