diff options
| author | Philipp Stephani | 2021-01-24 13:56:18 +0100 |
|---|---|---|
| committer | Philipp Stephani | 2021-01-24 13:56:18 +0100 |
| commit | d4dd12d3589559e61cdce978c40e1eb86a871266 (patch) | |
| tree | 45d3f12198f1ba7d0425243bc56e3cd5f5f613dc /test/src | |
| parent | e1902ac6182b156efaaf93013a707abb4b627765 (diff) | |
| download | emacs-d4dd12d3589559e61cdce978c40e1eb86a871266.tar.gz emacs-d4dd12d3589559e61cdce978c40e1eb86a871266.zip | |
Add more assertions to recently-added process test.
* test/src/process-tests.el (process-tests/multiple-threads-waiting):
Also check that 'thread-join' and 'thread-last-error' return the
expected errors.
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/process-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/src/process-tests.el b/test/src/process-tests.el index 676e1b1ac32..a3fba8d328b 100644 --- a/test/src/process-tests.el +++ b/test/src/process-tests.el | |||
| @@ -814,7 +814,8 @@ have written output." | |||
| 814 | (cl-loop for process in processes | 814 | (cl-loop for process in processes |
| 815 | and thread in threads | 815 | and thread in threads |
| 816 | do | 816 | do |
| 817 | (thread-join thread) | 817 | (should-not (thread-join thread)) |
| 818 | (should-not (thread-last-error)) | ||
| 818 | (should (eq (process-status process) 'exit)) | 819 | (should (eq (process-status process) 'exit)) |
| 819 | (should (eql (process-exit-status process) 0))))))) | 820 | (should (eql (process-exit-status process) 0))))))) |
| 820 | 821 | ||