Browse Source

Reformulate connect test so we don't depend on our close routines

master
Marcel van der Boom 9 years ago
parent
commit
9dc3fc7779
  1. 16
      ert-tests/twister-rpc-test.el

16
ert-tests/twister-rpc-test.el

@ -46,11 +46,17 @@ @@ -46,11 +46,17 @@
(featurep 'make-network-process '(:family ipv6))))
;; Basic connect to our service (is our host:port reachable)
(should
(make-network-process
:name "ci-testconnection"
:host twister-host
:service twister-port)))
(setq canconnect nil)
(unless
(condition-case nil
(delete-process
(make-network-process
:name "ci-testconnection"
:host twister-host
:service twister-port))
(error t))
(setq canconnect t))
(should canconnect))
;; the above test is a precondition for all the others, I'm

Loading…
Cancel
Save