Mercurial > emacs
changeset 2647:425c4138af31
* data.c (Ffset): Refuse to set the function value of t or nil.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Tue, 04 May 1993 02:26:53 +0000 |
parents | f879db79e748 |
children | 0a8d853dfebb |
files | src/data.c |
diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/data.c Tue May 04 02:24:42 1993 +0000 +++ b/src/data.c Tue May 04 02:26:53 1993 +0000 @@ -518,6 +518,9 @@ register Lisp_Object sym, newdef; { CHECK_SYMBOL (sym, 0); + if (NILP (sym) || EQ (sym, Qt)) + return Fsignal (Qsetting_constant, Fcons (sym, Qnil)); + if (!NILP (Vautoload_queue) && !EQ (XSYMBOL (sym)->function, Qunbound)) Vautoload_queue = Fcons (Fcons (sym, XSYMBOL (sym)->function), Vautoload_queue);