me/guix
Archived
1
0
Fork 0
Code Activity

substitute: Make http-multiple-get batch size configurable.

Browse source 
* guix/scripts/substitute.scm (http-multiple-get): Add batch-size parameter.
This commit is contained in:
Christopher Baines 2020-03-02 20:17:18 +00:00
parent 121191f23a
commit d5abb3049e
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
guix/scripts/substitute.scm
View file

@ -494,7 +494,8 @@ MAX-LENGTH first elements."
(loop (+ 1 len) tail (cons head result)))))))
(define* (http-multiple-get base-uri proc seed requests
#:key port (verify-certificate? #t))
#:key port (verify-certificate? #t)
(batch-size 1000))
"Send all of REQUESTS to the server at BASE-URI. Call PROC for each
response, passing it the request object, the response, a port from which to
read the response body, and the previous result, starting with SEED, à la
@ -504,7 +505,7 @@ initial connection on which HTTP requests are sent."
(requests requests)
(result seed))
(define batch
(at-most 1000 requests))
(at-most batch-size requests))
;; (format (current-error-port) "connecting (~a requests left)..."
;; (length requests))