diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-05-07 01:03:49 -0300 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-05-07 01:03:49 -0300 |
commit | d1dc2cc2ce985d92e1d1309344eb49f7e3b29312 (patch) | |
tree | ed54cb83c1e6d312810470ce77acb7789720f36c /lisp/emacs-lisp/bytecomp.el | |
parent | 4d3fcc8e6025592929f95ac1e36b9313ffa6d4f0 (diff) | |
download | emacs-d1dc2cc2ce985d92e1d1309344eb49f7e3b29312.tar.gz emacs-d1dc2cc2ce985d92e1d1309344eb49f7e3b29312.tar.bz2 emacs-d1dc2cc2ce985d92e1d1309344eb49f7e3b29312.zip |
Make bytecomp.el understand that defmethod defines functions.
* lisp/emacs-lisp/eieio.el (eieio--defalias, eieio--defgeneric-init-form):
New functions.
(defgeneric, eieio--defmethod): Use them.
(eieio-defgeneric): Remove.
(defmethod): Call defgeneric in a way visible to the byte-compiler.
Fixes: debbugs:8631
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 4c28d816f60..6ca8eed8ac6 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -4173,6 +4173,7 @@ binding slots have been popped." ;; Compile normally, but deal with warnings for the function being defined. (put 'defalias 'byte-hunk-handler 'byte-compile-file-form-defalias) +;; Used for eieio--defalias as well. (defun byte-compile-file-form-defalias (form) (if (and (consp (cdr form)) (consp (nth 1 form)) (eq (car (nth 1 form)) 'quote) |