aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorPaul Eggert <[email protected]>2012-07-02 01:00:05 -0700
committerPaul Eggert <[email protected]>2012-07-02 01:00:05 -0700
commite3ac128172da6ced7930b8c99d7bf1f2da19cac2 (patch)
tree6a875ae0dfb2987b7b25fd815ed5ff2e66e58878 /lisp/emacs-lisp/bytecomp.el
parent3b3e4caca71abc2df49f95090aaccb96cbb75a41 (diff)
Spelling fixes.
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index af7bc81fef..71b61ec74c 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2367,7 +2367,7 @@ not to take responsibility for the actual compilation of the code."
;;(byte-compile-set-symbol-position name)
(byte-compile-warn "probable `\"' without `\\' in doc string of %s"
name))
-
+
(if (not (listp body))
;; The precise definition requires evaluation to find out, so it
;; will only be known at runtime.
@@ -2451,7 +2451,7 @@ If QUOTED is non-nil, print with quoting; otherwise, print without quoting."
(- (position-bytes (point)) (point-min) -1)
(goto-char (point-max))))))
-(defun byte-compile--refiy-function (fun)
+(defun byte-compile--reify-function (fun)
"Return an expression which will evaluate to a function value FUN.
FUN should be either a `lambda' value or a `closure' value."
(pcase-let* (((or (and `(lambda ,args . ,body) (let env nil))
@@ -2488,7 +2488,7 @@ If FORM is a lambda or a macro, byte-compile it as a function."
(when (symbolp form)
(unless (memq (car-safe fun) '(closure lambda))
(error "Don't know how to compile %S" fun))
- (setq fun (byte-compile--refiy-function fun))
+ (setq fun (byte-compile--reify-function fun))
(setq lexical-binding (eq (car fun) 'closure)))
(unless (eq (car-safe fun) 'lambda)
(error "Don't know how to compile %S" fun))