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/comp-resources | |
| parent | 6082ab9697fa8c18e9049d24840d07efe6f95625 (diff) | |
| download | emacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.tar.gz emacs-16318bfb518aa7bc06e502e6fad7e53ec91067f9.zip | |
; Fix typos
Diffstat (limited to 'test/src/comp-resources')
| -rw-r--r-- | test/src/comp-resources/comp-test-funcs.el | 8 |
1 files changed, 4 insertions, 4 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))) |