2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00

Change par-mapper' to use fetch-result-of-defered-thunks

So the fetch-result-of-defered-thunk procedure can be removed.
This commit is contained in:
Christopher Baines 2023-04-27 11:48:59 +02:00
parent 9f080524bc
commit 5bb7cf0c1c

View file

@ -185,7 +185,7 @@
(head (defer-to-thread-pool-channel
(lambda ()
(apply proc heads)))))
(cons (fetch-result-of-defered-thunk head) tail)))
(cons (fetch-result-of-defered-thunks head) tail)))
(_
'())))))