guix-commits
[Top][All Lists]
Advanced

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

[shepherd] 02/03: tests: Update inetd tests to pass a list of endpoints.


From: Ludovic Courtès
Subject: [shepherd] 02/03: tests: Update inetd tests to pass a list of endpoints.
Date: Wed, 18 May 2022 10:00:22 -0400 (EDT)

civodul pushed a commit to branch wip-inetd-ipv6
in repository shepherd.

commit febfbc80b01b25bf7295fe03e8b54384dffb89da
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed May 18 11:45:43 2022 +0200

    tests: Update inetd tests to pass a list of endpoints.
    
    * tests/inetd.sh: Pass 'make-inetd-constructor' a list of endpoints.
---
 tests/inetd.sh | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/tests/inetd.sh b/tests/inetd.sh
index ef18800..83037bf 100644
--- a/tests/inetd.sh
+++ b/tests/inetd.sh
@@ -42,15 +42,18 @@ cat > "$conf" <<EOF
  (make <service>
    #:provides '(test-inetd)
    #:start (make-inetd-constructor %command
-                                   (make-socket-address AF_INET
-                                                        INADDR_LOOPBACK
-                                                        $PORT))
+                                   (list
+                                    (endpoint (make-socket-address
+                                               AF_INET
+                                               INADDR_LOOPBACK
+                                               $PORT))))
    #:stop  (make-inetd-destructor))
  (make <service>
    #:provides '(test-inetd-unix)
    #:start (make-inetd-constructor %command
-                                   (make-socket-address AF_UNIX
-                                                        "$service_socket")
+                                   (list
+                                    (endpoint (make-socket-address
+                                               AF_UNIX "$service_socket")))
                                    #:max-connections 5)
    #:stop  (make-inetd-destructor)))
 



reply via email to

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