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:
parent
9f080524bc
commit
5bb7cf0c1c
|
@ -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)))
|
||||
(_
|
||||
'())))))
|
||||
|
||||
|
|
Loading…
Reference in New Issue