From e52743b458fef293a562fbb842b60e4bf3b06eff Mon Sep 17 00:00:00 2001 From: Janneke Nieuwenhuizen Date: Wed, 7 Jun 2023 21:00:19 +0200 Subject: [PATCH] gnu: curl: Skip failing test on the Hurd. * gnu/packages/curl.scm (curl)[arguments]: When building natively on the Hurd, add phase 'skip-tests'. --- gnu/packages/curl.scm | 19 +++++++++++++++++-- 1 file changed, 17 insertions(+), 2 deletions(-) diff --git a/gnu/packages/curl.scm b/gnu/packages/curl.scm index 76fcc115cf..4e3c563570 100644 --- a/gnu/packages/curl.scm +++ b/gnu/packages/curl.scm @@ -11,7 +11,7 @@ ;;; Copyright © 2019, 2021 Ricardo Wurmus ;;; Copyright © 2020 Jakub Kądziołka ;;; Copyright © 2020 Dale Mellor -;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen +;;; Copyright © 2020, 2023 Janneke Nieuwenhuizen ;;; Copyright © 2021 Jean-Baptiste Volatier ;;; Copyright © 2021 Felix Gruber ;;; Copyright © 2023 Sharlatan Hellseher @@ -125,7 +125,22 @@ ;; The top-level "make check" does "make -C tests quiet-test", which ;; is too quiet. Use the "test" target instead, which is more ;; verbose. - (invoke "make" "-C" "tests" "test"))))))) + (invoke "make" "-C" "tests" "test")))) + #$@(if (system-hurd?) + #~((add-after 'unpack 'skip-tests + (lambda _ + (let ((port (open-file "tests/data/DISABLED" "a"))) + (display "526\n" port) + (display "527\n" port) + (display "532\n" port) + (display "533\n" port) + (display "537\n" port) + (display "546\n" port) + (display "575\n" port) + (display "1021\n" port) + (display "1501\n" port) + (close port))))) + #~())))) (synopsis "Command line tool for transferring data with URL syntax") (description "curl is a command line tool for transferring data with URL syntax,