# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 724962862 0
# Node ID f0d8f2b34eb3388aef915d4b86ab3adfaf13d208
# Parent  ca439341a0e5e029240cfb21d8775bf7fb7f445a
(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.

diff -r ca439341a0e5 -r f0d8f2b34eb3 lisp/subr.el
--- 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)