]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix process-tests on MS-Windows
authorEli Zaretskii <eliz@gnu.org>
Thu, 31 Dec 2020 14:50:19 +0000 (16:50 +0200)
committerEli Zaretskii <eliz@gnu.org>
Thu, 31 Dec 2020 14:50:19 +0000 (16:50 +0200)
* test/src/process-tests.el (process-tests--fd-setsize-test): On
MS-Windows start the pipe processes in the "stopped" condition.

test/src/process-tests.el

index 24b09c56e2c3901ed3f84557ee01714a69d2fa27..8d4516ff3b6c2a53397a37fad076d2419e21e764 100644 (file)
@@ -493,6 +493,13 @@ FD_SETSIZE."
                     for ,process = (process-tests--ignore-EMFILE
                                      (make-pipe-process
                                       :name (format "pipe %d" i)
+                                      ;; Prevent delete-process from
+                                      ;; trying to read from pipe
+                                      ;; processes that didn't exit
+                                      ;; yet, because no one is
+                                      ;; writing to those pipes, and
+                                      ;; the read will stall.
+                                      :stop (eq system-type 'windows-nt)
                                       :buffer ,buffer
                                       :coding 'no-conversion
                                       :noquery t))