diff options
| author | Stefan Kangas | 2022-11-20 12:59:39 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2022-11-20 12:59:39 +0100 |
| commit | 16318bfb518aa7bc06e502e6fad7e53ec91067f9 (patch) | |
| tree | e27122c0a061762bc483ed245ca62ac8d957f881 /test/src | |
| parent | 6082ab9697fa8c18e9049d24840d07efe6f95625 (diff) | |
| download | emacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.tar.gz emacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.zip | |
; Fix typos
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/comp-resources/comp-test-funcs.el | 8 | ||||
| -rw-r--r-- | test/src/comp-tests.el | 4 | ||||
| -rw-r--r-- | test/src/eval-tests.el | 2 |
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. |