From ee9c5b6e33a8ff2ad02c9962988ee02488e50885 Mon Sep 17 00:00:00 2001 From: Kevin Ryde Date: Tue, 9 May 2006 00:33:44 +0000 Subject: [PATCH] (n-par-for-each, n-for-each-par-map): Two more spots where `futures' should become `threads' from Marius' change of 2006-01-29. --- ice-9/threads.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ice-9/threads.scm b/ice-9/threads.scm index 74021dc3d..cdabb2417 100644 --- a/ice-9/threads.scm +++ b/ice-9/threads.scm @@ -86,7 +86,7 @@ (threads '())) (do ((i 0 (+ 1 i))) ((= i n) - (for-each join-thread futures)) + (for-each join-thread threads)) (set! threads (cons (begin-thread (let loop () @@ -115,7 +115,7 @@ of applying P-PROC on ARGLISTS." (result results)) (do ((i 0 (+ 1 i))) ((= i n) - (for-each join-thread futures)) + (for-each join-thread threads)) (set! threads (cons (begin-thread (let loop ()