diff options
| author | Glenn Morris <rgm@gnu.org> | 2016-12-10 18:58:24 -0800 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2016-12-10 18:58:24 -0800 |
| commit | ba8e883fa30f1267c27751c1ee9df25a5dde4c0c (patch) | |
| tree | db838795f653937c63996857babbe636b1d106d6 /lisp/emacs-lisp | |
| parent | 010733616543f86aed9e351d5754d02864c2ea26 (diff) | |
| download | emacs-ba8e883fa30f1267c27751c1ee9df25a5dde4c0c.tar.gz emacs-ba8e883fa30f1267c27751c1ee9df25a5dde4c0c.tar.bz2 emacs-ba8e883fa30f1267c27751c1ee9df25a5dde4c0c.zip | |
Do not allow nil to be defined as a function
* lisp/emacs-lisp/byte-run.el (defun):
* src/data.c (Ffset): Do not allow "nil". (Bug#25110)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/byte-run.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 69b4f41fef6..9d2a048f365 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -240,6 +240,7 @@ The return value is undefined. ;; from ;; (defun foo (arg) (toto)). (declare (doc-string 3) (indent 2)) + (or name (error "Cannot define '%s' as a function" name)) (if (null (and (listp arglist) (null (delq t (mapcar #'symbolp arglist))))) |