mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 08:11:05 -08:00
Code Issues Projects Releases Wiki Activity

(Fdefmacro): Signal an error if NAME is not a symbol.

Browse source
This commit is contained in:
John Paul Wallington 2004-07-06 01:38:58 +00:00
parent 6f1df6d9d6
commit 8e975df9c8
2 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/ChangeLog
View file

@ -1,3 +1,7 @@
2004-07-06 John Paul Wallington <jpw@gnu.org>
* eval.c (Fdefmacro): Signal an error if NAME is not a symbol.
2004-07-05 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* macterm.c (mac_initialize_display_info): Use CGGetActiveDisplayList

1
src/eval.c
View file

@ -657,6 +657,7 @@ usage: (defmacro NAME ARGLIST [DOCSTRING] [DECL] BODY...) */)
Lisp_Object lambda_list, doc, tail;
fn_name = Fcar (args);
CHECK_SYMBOL (fn_name);
lambda_list = Fcar (Fcdr (args));
tail = Fcdr (Fcdr (args));