aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2022-07-06 18:00:13 +0200
committerLudovic Courtès <ludo@gnu.org>2022-07-08 17:28:50 +0200
commit3759b71dc8b175ba02bc2f87e4f426ceed342d42 (patch)
tree71e9e6f05e0f3ae0f0bec5f2c9bc9ce525bef45f /gnu
parentff751a68dca4d3436341d1ec5e0d0ba7e269c777 (diff)
downloadguix-3759b71dc8b175ba02bc2f87e4f426ceed342d42.tar.gz
guix-3759b71dc8b175ba02bc2f87e4f426ceed342d42.zip
gnu: curl@7.84.0: Reduce lib3026 resource use on 32-bit platforms.
This is a followup to c145e51844bf52eb77cdc969a0fe30a48755b29e. See discussion at <https://lists.gnu.org/archive/html/guix-devel/2022-07/msg00011.html>. * gnu/packages/curl.scm (curl-7.84.0)[arguments]: Remove 'skip-failing-tests' and add 'tweak-lib3026-test'.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/curl.scm16
1 files changed, 7 insertions, 9 deletions
diff --git a/gnu/packages/curl.scm b/gnu/packages/curl.scm
index 6d1cc9a572..d82d94abff 100644
--- a/gnu/packages/curl.scm
+++ b/gnu/packages/curl.scm
@@ -2,7 +2,7 @@
;;; Copyright © 2013, 2014, 2015 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2015 Tomáš Čech <sleep_walker@suse.cz>
-;;; Copyright © 2015, 2020, 2021 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2015, 2020, 2021, 2022 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016, 2017, 2019 Leo Famulari <leo@famulari.name>
;;; Copyright © 2017, 2019, 2020, 2022 Marius Bakke <marius@gnu.org>
;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il>
@@ -161,15 +161,13 @@ tunneling, and so on.")
(cond
((not (target-64bit?))
#~(modify-phases #$phases
- (add-after 'unpack 'skip-failing-tests
+ (add-after 'unpack 'tweak-lib3026-test
(lambda _
- (with-output-to-port
- (open-file "tests/data/DISABLED" "a")
- (lambda ()
- (display "# curl_global_init thread-safety")
- (newline)
- (display 3026)
- (newline)))))))
+ ;; Have that test create a hundred threads, not a
+ ;; thousand.
+ (substitute* "tests/libtest/lib3026.c"
+ (("NUM_THREADS .*$")
+ "NUM_THREADS 100\n"))))))
(else phases)))))))
(define-public curl-minimal