aboutsummaryrefslogtreecommitdiffstats
path: root/test/src
diff options
context:
space:
mode:
authorStefan Kangas2022-11-20 12:59:39 +0100
committerStefan Kangas2022-11-20 12:59:39 +0100
commit16318bfb518aa7bc06e502e6fad7e53ec91067f9 (patch)
treee27122c0a061762bc483ed245ca62ac8d957f881 /test/src
parent6082ab9697fa8c18e9049d24840d07efe6f95625 (diff)
downloademacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.tar.gz
emacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.zip
; Fix typos
Diffstat (limited to 'test/src')
-rw-r--r--test/src/comp-resources/comp-test-funcs.el8
-rw-r--r--test/src/comp-tests.el4
-rw-r--r--test/src/eval-tests.el2
3 files changed, 7 insertions, 7 deletions
diff --git a/test/src/comp-resources/comp-test-funcs.el b/test/src/comp-resources/comp-test-funcs.el
index 9092f040c80..03925d4d2e8 100644
--- a/test/src/comp-resources/comp-test-funcs.el
+++ b/test/src/comp-resources/comp-test-funcs.el
@@ -211,10 +211,10 @@
211 (comp-tests-err-arith-f) 211 (comp-tests-err-arith-f)
212 (arith-error (concat "arith-error " 212 (arith-error (concat "arith-error "
213 (error-message-string err) 213 (error-message-string err)
214 " catched")) 214 " caught"))
215 (error (concat "error " 215 (error (concat "error "
216 (error-message-string err) 216 (error-message-string err)
217 " catched")))) 217 " caught"))))
218(defun comp-tests-condition-case-1-f () 218(defun comp-tests-condition-case-1-f ()
219 ;; Bpushhandler Bpophandler 219 ;; Bpushhandler Bpophandler
220 (condition-case 220 (condition-case
@@ -222,10 +222,10 @@
222 (comp-tests-err-foo-f) 222 (comp-tests-err-foo-f)
223 (arith-error (concat "arith-error " 223 (arith-error (concat "arith-error "
224 (error-message-string err) 224 (error-message-string err)
225 " catched")) 225 " caught"))
226 (error (concat "error " 226 (error (concat "error "
227 (error-message-string err) 227 (error-message-string err)
228 " catched")))) 228 " caught"))))
229(defun comp-tests-catch-f (f) 229(defun comp-tests-catch-f (f)
230 (catch 'foo 230 (catch 'foo
231 (funcall f))) 231 (funcall f)))
diff --git a/test/src/comp-tests.el b/test/src/comp-tests.el
index 734b4a0d221..4e512098a3d 100644
--- a/test/src/comp-tests.el
+++ b/test/src/comp-tests.el
@@ -298,9 +298,9 @@ Check that the resulting binaries do not differ."
298(comp-deftest non-locals () 298(comp-deftest non-locals ()
299 "Test non locals." 299 "Test non locals."
300 (should (string= (comp-tests-condition-case-0-f) 300 (should (string= (comp-tests-condition-case-0-f)
301 "arith-error Arithmetic error catched")) 301 "arith-error Arithmetic error caught"))
302 (should (string= (comp-tests-condition-case-1-f) 302 (should (string= (comp-tests-condition-case-1-f)
303 "error Foo catched")) 303 "error Foo caught"))
304 (should (= (comp-tests-catch-f 304 (should (= (comp-tests-catch-f
305 (lambda () (throw 'foo 3))) 305 (lambda () (throw 'foo 3)))
306 3)) 306 3))
diff --git a/test/src/eval-tests.el b/test/src/eval-tests.el
index bb2f04e8ee1..0e12e4dbd8a 100644
--- a/test/src/eval-tests.el
+++ b/test/src/eval-tests.el
@@ -222,7 +222,7 @@ expressions works for identifiers starting with period."
222 222
223(ert-deftest eval-tests/funcall-with-delayed-message () 223(ert-deftest eval-tests/funcall-with-delayed-message ()
224 ;; Check that `funcall-with-delayed-message' displays its message before 224 ;; Check that `funcall-with-delayed-message' displays its message before
225 ;; its function terminates iff the timeout is short enough. 225 ;; its function terminates if the timeout is short enough.
226 226
227 ;; This also serves as regression test for bug#55628 where a short 227 ;; This also serves as regression test for bug#55628 where a short
228 ;; timeout was rounded up to the next whole second. 228 ;; timeout was rounded up to the next whole second.