diff options
| author | Philipp Stephani | 2021-01-10 10:14:27 +0100 |
|---|---|---|
| committer | Philipp Stephani | 2021-01-10 10:14:27 +0100 |
| commit | 690cf6b8d8b8827f046bc1e24b2e556afeff976c (patch) | |
| tree | 23a5c82720092bf8979b5dd30f5e6afc65d5280c | |
| parent | 302e6d4623d6f87789c055717490799c1f2ec015 (diff) | |
| download | emacs-690cf6b8d8b8827f046bc1e24b2e556afeff976c.tar.gz emacs-690cf6b8d8b8827f046bc1e24b2e556afeff976c.zip | |
Increase probability that a process test succeeds.
* test/src/process-tests.el
(process-tests/fd-setsize-no-crash/make-process): Work around
potential Emacs bug.
| -rw-r--r-- | test/src/process-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/src/process-tests.el b/test/src/process-tests.el index ca98f54bdb1..921bcd5f85b 100644 --- a/test/src/process-tests.el +++ b/test/src/process-tests.el | |||
| @@ -565,6 +565,11 @@ FD_SETSIZE file descriptors (Bug#24325)." | |||
| 565 | (should (memq (process-status process) '(run exit))) | 565 | (should (memq (process-status process) '(run exit))) |
| 566 | (when (process-live-p process) | 566 | (when (process-live-p process) |
| 567 | (process-send-eof process)) | 567 | (process-send-eof process)) |
| 568 | ;; FIXME: This `sleep-for' shouldn't be needed. It | ||
| 569 | ;; indicates a bug in Emacs; perhaps SIGCHLD is | ||
| 570 | ;; received in parallel with `accept-process-output', | ||
| 571 | ;; causing the latter to hang. | ||
| 572 | (sleep-for 0.1) | ||
| 568 | (while (accept-process-output process)) | 573 | (while (accept-process-output process)) |
| 569 | (should (eq (process-status process) 'exit)) | 574 | (should (eq (process-status process) 'exit)) |
| 570 | ;; If there's an error between fork and exec, Emacs | 575 | ;; If there's an error between fork and exec, Emacs |