diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2020-03-07 15:59:48 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2020-03-07 18:39:40 +0100 |
| commit | 3795049ce6020b278ec62e6bbb841937d6db1750 (patch) | |
| tree | 3130528f41030c1309141dc2febce95edda536d9 /test-suite | |
| parent | 51a52cd6c635abee6b742a7d9241eca513a41f96 (diff) | |
Actually run '00-repl-server.test'.
This is a followup to ddcab06f20525d975503d8d9611e02021fb0dff1. Until
now the tests would always be marked as unresolved because TMPDIR was
removed before the client and server had been started.
* test-suite/tests/00-repl-server.test (call-with-repl-server): Remove
initial call to 'rmdir'. Add calls to 'delete-file' and 'rmdir' in the
unwind handler.
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/tests/00-repl-server.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test-suite/tests/00-repl-server.test b/test-suite/tests/00-repl-server.test index ebc2cad11..8c5713f4a 100644 --- a/test-suite/tests/00-repl-server.test +++ b/test-suite/tests/00-repl-server.test @@ -43,7 +43,6 @@ socket connected to that server." (sockaddr (make-socket-address AF_UNIX (string-append tmpdir "/repl-server"))) (client-socket (socket AF_UNIX SOCK_STREAM 0))) (false-if-exception (delete-file (sockaddr:path sockaddr))) - (false-if-exception (rmdir tmpdir)) ;; The REPL server requires thread. The test requires fork. (unless (and (provided? 'threads) (provided? 'fork)) @@ -90,6 +89,8 @@ socket connected to that server." (lambda () (false-if-exception (close-port client-socket)) (false-if-exception (kill pid SIGTERM)) + (false-if-exception (delete-file (sockaddr:path sockaddr))) + (false-if-exception (rmdir tmpdir)) (sigaction SIGPIPE SIG_DFL))))))) (define-syntax-rule (with-repl-server client-socket body ...) |