]> git.eshelyaron.com Git - emacs.git/commitdiff
Convert some network test failures to skipping
authorGlenn Morris <rgm@gnu.org>
Wed, 11 Jan 2017 19:35:51 +0000 (14:35 -0500)
committerGlenn Morris <rgm@gnu.org>
Wed, 11 Jan 2017 19:35:51 +0000 (14:35 -0500)
These tests intermittently fail on hydra.nixos.org for unclear
reasons related to starting the external process.
This isn't an Emacs issue, and the failures cause noise on
the emacs-buildstatus list.  (Bug#24503)
* test/lisp/net/network-stream-tests.el (echo-server-nowait)
(connect-to-tls-ipv4-nowait): Skip rather than fail if the
external process fails to start properly.

test/lisp/net/network-stream-tests.el

index b237fea3dd10dbd9e2aa4228f29f365bd83e8fd9..e7bb3e8ccf93b5e4bfe1e543fbb2ebbc599c1674 100644 (file)
     (while (and (eq (process-status proc) 'connect)
                 (< (setq times (1+ times)) 10))
       (sit-for 0.1))
-    (should-not (eq (process-status proc) 'connect))
+    (skip-unless (not (eq (process-status proc) 'connect)))
     (with-current-buffer (process-buffer proc)
       (process-send-string proc "echo foo")
       (sleep-for 0.1)
           (while (and (eq (process-status proc) 'connect)
                       (< (setq times (1+ times)) 10))
             (sit-for 0.1))
-          (should-not (eq (process-status proc) 'connect)))
+          (skip-unless (not (eq (process-status proc) 'connect))))
       (if (process-live-p server) (delete-process server)))
     (setq status (gnutls-peer-status proc))
     (should (consp status))