diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2022-09-29 15:19:01 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2022-09-29 15:20:07 +0200 |
| commit | 423bdd5f7f273f40f750eac83017074501d52823 (patch) | |
| tree | 82b074b2fd58bd15c74ffa9dcad80ec9cf29c9f3 /lisp/emacs-lisp/byte-opt.el | |
| parent | 0f94e62d7ef51c486956caa933f7cd5d21e4881b (diff) | |
| download | emacs-423bdd5f7f273f40f750eac83017074501d52823.tar.gz | |
; Fix typos (prefer American spelling)
Diffstat (limited to 'lisp/emacs-lisp/byte-opt.el')
| -rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index ed6b7b08a49..5ef2d7fe827 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -812,7 +812,7 @@ for speeding up processing.") (defun byte-compile-nilconstp (form) "Return non-nil if FORM always evaluates to a nil value." (setq form (byte-opt--bool-value-form form)) - (or (not form) ; assume (quote nil) always being normalised to nil + (or (not form) ; assume (quote nil) always being normalized to nil (and (consp form) (let ((head (car form))) ;; FIXME: There are many other expressions that are statically nil. @@ -1184,7 +1184,7 @@ See Info node `(elisp) Integer Basics'." (if (equal new-args (cdr form)) ;; Input is unchanged: keep original form, and don't represent ;; a nil result explicitly because that would lead to infinite - ;; growth when the optimiser is iterated. + ;; growth when the optimizer is iterated. (setq nil-result nil) (setq form (cons (car form) new-args))) |