summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/bytecomp.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2023-12-10 13:22:04 +0100
committerStefan Kangas <stefankangas@gmail.com>2023-12-10 13:22:04 +0100
commit06a12b0cccbda419752f3388346be7d302ebcbeb (patch)
tree69c3a4c23638553993a7580cae4a4d597fd8e258 /lisp/emacs-lisp/bytecomp.el
parent1d5028ad0414cad458aac1102d3612e4956068c5 (diff)
downloademacs-06a12b0cccbda419752f3388346be7d302ebcbeb.tar.gz
emacs-06a12b0cccbda419752f3388346be7d302ebcbeb.tar.bz2
emacs-06a12b0cccbda419752f3388346be7d302ebcbeb.zip
; Fix typos
Diffstat (limited to 'lisp/emacs-lisp/bytecomp.el')
-rw-r--r--lisp/emacs-lisp/bytecomp.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 64fd4f6b3f3..950ae77803c 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -3566,7 +3566,7 @@ lambda-expression."
(cond
((and sef (or (eq sef 'error-free)
byte-compile-delete-errors))
- ;; This transform is normally done in the Lisp optimiser,
+ ;; This transform is normally done in the Lisp optimizer,
;; so maybe we don't need to bother about it here?
(setq form (cons 'progn (cdr form)))
(setq handler #'byte-compile-progn))
@@ -3603,7 +3603,7 @@ lambda-expression."
(let ((important-return-value-fns
'(
;; These functions are side-effect-free except for the
- ;; behaviour of functions passed as argument.
+ ;; behavior of functions passed as argument.
mapcar mapcan mapconcat
assoc plist-get plist-member
@@ -4148,7 +4148,7 @@ If it is nil, then the handler is \"byte-compile-SYMBOL.\""
(byte-compile-two-args
(if (macroexp-const-p (nth 1 form))
;; First argument is constant: flip it so that the constant
- ;; is last, which may allow more lapcode optimisations.
+ ;; is last, which may allow more lapcode optimizations.
(let* ((op (car form))
(flipped-op (cdr (assq op '((< . >) (<= . >=)
(> . <) (>= . <=) (= . =))))))
@@ -4312,7 +4312,7 @@ This function is never called when `lexical-binding' is nil."
(arg2 (nth 2 form)))
(when (and (memq (car form) '(+ *))
(macroexp-const-p arg1))
- ;; Put constant argument last for better LAP optimisation.
+ ;; Put constant argument last for better LAP optimization.
(cl-rotatef arg1 arg2))
(byte-compile-form arg1)
(byte-compile-form arg2)
@@ -5326,7 +5326,7 @@ FORM is used to provide location, `bytecomp--cus-function' and
"Warn about common mistakes in the `defcustom' type TYPE."
(let ((invalid-types
'(
- ;; Lisp type predicates, often confused with customisation types:
+ ;; Lisp type predicates, often confused with customization types:
functionp numberp integerp fixnump natnump floatp booleanp
characterp listp stringp consp vectorp symbolp keywordp
hash-table-p facep