diff options
| author | Paul Eggert | 2011-11-14 12:23:26 -0800 |
|---|---|---|
| committer | Paul Eggert | 2011-11-14 12:23:26 -0800 |
| commit | 8350f087efe62e2ce0ded434534629a56cdc4e8c (patch) | |
| tree | 9976cec81196a0465269f8669f2a85328570dfd4 /test | |
| parent | 322ad6ec0e773dffefad12df88c98041ca35b427 (diff) | |
| download | emacs-8350f087efe62e2ce0ded434534629a56cdc4e8c.tar.gz emacs-8350f087efe62e2ce0ded434534629a56cdc4e8c.zip | |
Spelling fixes.
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/ert-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/automated/ert-tests.el b/test/automated/ert-tests.el index cea994f64b8..1fe6352e1fe 100644 --- a/test/automated/ert-tests.el +++ b/test/automated/ert-tests.el | |||
| @@ -228,7 +228,7 @@ failed or if there was a problem." | |||
| 228 | :form (error "Foo") | 228 | :form (error "Foo") |
| 229 | :condition (error "Foo") | 229 | :condition (error "Foo") |
| 230 | :fail-reason | 230 | :fail-reason |
| 231 | "the error signalled did not have the expected type")))))) | 231 | "the error signaled did not have the expected type")))))) |
| 232 | ;; Error of the expected type. | 232 | ;; Error of the expected type. |
| 233 | (let* ((error nil) | 233 | (let* ((error nil) |
| 234 | (test (make-ert-test | 234 | (test (make-ert-test |
| @@ -258,7 +258,7 @@ failed or if there was a problem." | |||
| 258 | :form (signal arith-error nil) | 258 | :form (signal arith-error nil) |
| 259 | :condition (arith-error) | 259 | :condition (arith-error) |
| 260 | :fail-reason | 260 | :fail-reason |
| 261 | "the error signalled did not have the expected type")))))) | 261 | "the error signaled did not have the expected type")))))) |
| 262 | (let ((test (make-ert-test | 262 | (let ((test (make-ert-test |
| 263 | :body (lambda () | 263 | :body (lambda () |
| 264 | (should-error (signal 'arith-error nil) | 264 | (should-error (signal 'arith-error nil) |
| @@ -275,7 +275,7 @@ failed or if there was a problem." | |||
| 275 | :form (signal arith-error nil) | 275 | :form (signal arith-error nil) |
| 276 | :condition (arith-error) | 276 | :condition (arith-error) |
| 277 | :fail-reason | 277 | :fail-reason |
| 278 | "the error signalled did not have the expected type")))))) | 278 | "the error signaled did not have the expected type")))))) |
| 279 | (let ((test (make-ert-test | 279 | (let ((test (make-ert-test |
| 280 | :body (lambda () | 280 | :body (lambda () |
| 281 | (should-error (signal 'singularity-error nil) | 281 | (should-error (signal 'singularity-error nil) |
| @@ -292,7 +292,7 @@ failed or if there was a problem." | |||
| 292 | :form (signal singularity-error nil) | 292 | :form (signal singularity-error nil) |
| 293 | :condition (singularity-error) | 293 | :condition (singularity-error) |
| 294 | :fail-reason | 294 | :fail-reason |
| 295 | "the error signalled was a subtype of the expected type"))))) | 295 | "the error signaled was a subtype of the expected type"))))) |
| 296 | )) | 296 | )) |
| 297 | 297 | ||
| 298 | (defmacro ert--test-my-list (&rest args) | 298 | (defmacro ert--test-my-list (&rest args) |