Mercurial > emacs
changeset 1695:f0d8f2b34eb3
(ignore): Use defun instead of fset to define; the byte compiler is smart
enough now not to compile this trivial function into slow byte code.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Mon, 21 Dec 1992 18:34:22 +0000 |
| parents | ca439341a0e5 |
| children | cceb5375ce40 |
| files | lisp/subr.el |
| diffstat | 1 files changed, 3 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/subr.el Mon Dec 21 18:26:29 1992 +0000 +++ b/lisp/subr.el Mon Dec 21 18:34:22 1992 +0000 @@ -203,15 +203,10 @@ (cons 'progn body) (list 'store-match-data original))))) -;; Avoids useless byte-compilation. -;; In the future, would be better to fix byte compiler -;; not to really compile in cases like this, -;; and use defun here. -(fset 'ignore '(lambda (&rest ignore) - "Do nothing. +(defun ignore (&rest ignore) + "Do nothing. Accept any number of arguments, but ignore them." - nil)) - + nil) ; old names (fset 'make-syntax-table 'copy-syntax-table)