guix-commits
[Top][All Lists]
Advanced

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

04/12: gnu: clisp: Remove unused patch.


From: guix-commits
Subject: 04/12: gnu: clisp: Remove unused patch.
Date: Tue, 1 Dec 2020 05:55:57 -0500 (EST)

glv pushed a commit to branch master
in repository guix.

commit 718dd9779aa74ab397ff6a69e9bf36e83c3adf5b
Author: Guillaume Le Vaillant <glv@posteo.net>
AuthorDate: Tue Dec 1 10:17:16 2020 +0100

    gnu: clisp: Remove unused patch.
    
    This is a follow-up for 074236d19796577b2f55b3c7030c14242efa8f3f.
    
    * gnu/patches/clisp-remove-failing-test.patch: Remove file.
    * gnu/local.mk (dist_patch_DATA): Remove it.
---
 gnu/local.mk                                       |  1 -
 .../patches/clisp-remove-failing-test.patch        | 43 ----------------------
 2 files changed, 44 deletions(-)

diff --git a/gnu/local.mk b/gnu/local.mk
index c14e2aa..3a3919b 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -887,7 +887,6 @@ dist_patch_DATA =                                           
\
   %D%/packages/patches/clementine-fix-sqlite.patch             \
   %D%/packages/patches/clementine-remove-crypto++-dependency.patch     \
   %D%/packages/patches/clementine-use-openssl.patch            \
-  %D%/packages/patches/clisp-remove-failing-test.patch         \
   %D%/packages/patches/clucene-pkgconfig.patch                 \
   %D%/packages/patches/cmake-curl-certificates.patch           \
   %D%/packages/patches/coda-use-system-libs.patch              \
diff --git a/gnu/packages/patches/clisp-remove-failing-test.patch 
b/gnu/packages/patches/clisp-remove-failing-test.patch
deleted file mode 100644
index e44ce80..0000000
--- a/gnu/packages/patches/clisp-remove-failing-test.patch
+++ /dev/null
@@ -1,43 +0,0 @@
-This test doesn't ever complete or timeout
-
----
- tests/socket.tst | 24 ------------------------
- 1 file changed, 24 deletions(-)
-
-diff --git a/tests/socket.tst b/tests/socket.tst
-index 93c6310..1d976ff 100644
---- a/tests/socket.tst
-+++ b/tests/socket.tst
-@@ -551,30 +551,6 @@ T
-           interfaces))
- ("0.0.0.0" "127.0.0.1" "0.0.0.0" "127.0.0.1")
- 
--(multiple-value-bind (run args) (cmd-args)
--  (let ((se (socket:socket-server)))
--    (ext:run-program run :arguments (append args (list "-q" "-q" "-x" (format 
nil "(close (socket:socket-connect ~D))" (socket:socket-server-port se))))
--                     :wait nil :input nil :output nil)
--    (unwind-protect
--         (with-open-stream (so (socket:socket-accept se))
--           (list
--            (socket:socket-status so)
--            (write-line "foo" so)
--            (socket:socket-status so)
--            #+macos (handler-case (read-char so)
--                      (end-of-file (c)
--                        (princ 'read-char) (princ-error c) t))
--            #-macos (check-os-error (read-char so) (:ECONNRESET 104))
--            (null (member (socket:socket-status so) '(:EOF :APPEND)))
--            #+macos (string= (write-line "bar" so) "bar")
--            #-macos (check-os-error (write-line "bar" so) (:EPIPE 32))
--            (null (member (socket:socket-status so) '(:EOF :APPEND)))
--            (handler-case (read-char so)
--              (end-of-file (c)
--                (princ 'read-char) (princ-error c) 'end-of-file))))
--      (socket:socket-server-close se))))
--(:OUTPUT "foo" :OUTPUT T NIL T NIL END-OF-FILE)
--
- ;; https://sourceforge.net/p/clisp/feature-requests/46/
- (check-os-error (socket:socket-connect 0)
-   #-(or win32 macos) (:ECONNREFUSED 111)
--- 
-



reply via email to

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