[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 01/03: Actually run '00-repl-server.test'.

From: Ludovic Courtès
Subject: [Guile-commits] 01/03: Actually run '00-repl-server.test'.
Date: Sat, 7 Mar 2020 12:59:38 -0500 (EST)

civodul pushed a commit to branch stable-2.2
in repository guile.

commit 3795049ce6020b278ec62e6bbb841937d6db1750
Author: Ludovic Courtès <address@hidden>
AuthorDate: Sat Mar 7 15:59:48 2020 +0100

    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.
 test-suite/tests/00-repl-server.test | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/test-suite/tests/00-repl-server.test 
index ebc2cad..8c5713f 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 
          (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 ...)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]