| commit | f07a954eeb0930029104402e706165bf89853576 | |
| author | Stefan Monnier <monnier@iro.umontreal.ca> | |
| Mon, 13 Dec 2010 04:04:15 +0000 (12 23:04 -0500) | ||
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | |
| Mon, 13 Dec 2010 04:04:15 +0000 (12 23:04 -0500) | ||
| tree | 143d5c5a95904a0559d555ae6fe97eaed7839211 | treesnapshot (tar.gz zip) |
| parent | 2c302df3a13236bfbf8ea1b771d13618fcda8d71 | commitdiff |
Make the effect of (defvar foo) local.
* src/eval.c (apply_lambda): Make static. Remove eval_flag arg.
(Fsetq): Don't check declared_special.
(Fdefun, Fdefmacro): Use Ffunction.
(Fdefvar): Don't set declared_special for (defvar foo).
(FletX): Check locally-special vars. Only do specbind once.
(Flet): Check locally-special vars.
(Feval): Don't check declared_special.
(funcall_lambda): Check locally-special vars.
* src/lisp.h (apply_lambda): Remove extern declaration.
* src/lread.c (readevalloop): CSE.
* lisp/subr.el (with-lexical-binding): Remove.
* src/eval.c (apply_lambda): Make static. Remove eval_flag arg.
(Fsetq): Don't check declared_special.
(Fdefun, Fdefmacro): Use Ffunction.
(Fdefvar): Don't set declared_special for (defvar foo).
(FletX): Check locally-special vars. Only do specbind once.
(Flet): Check locally-special vars.
(Feval): Don't check declared_special.
(funcall_lambda): Check locally-special vars.
* src/lisp.h (apply_lambda): Remove extern declaration.
* src/lread.c (readevalloop): CSE.
* lisp/subr.el (with-lexical-binding): Remove.