mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-05-01 02:31:23 -07:00
(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.
This commit is contained in:
parent
ac21ec406a
commit
a42a43055f
1 changed files with 3 additions and 8 deletions
11
lisp/subr.el
11
lisp/subr.el
|
|
@ -203,15 +203,10 @@ in KEYMAP as NEWDEF those chars which are defined as OLDDEF in OLDMAP."
|
|||
(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)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue