Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
join_next: do not yield, even if overloaded, to minimize "running" tasks;
authorwenzelm
Mon, 27 Jul 2009 16:08:41 +0200
changeset 32227 a7e901209005
parent 32226 23511e4da055
child 32228 7622c03141b0
join_next: do not yield, even if overloaded, to minimize "running" tasks;
src/Pure/Concurrent/future.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Concurrent/future.ML	Mon Jul 27 15:53:43 2009 +0200
+++ b/src/Pure/Concurrent/future.ML	Mon Jul 27 16:08:41 2009 +0200
@@ -347,7 +347,6 @@
 
 fun join_next deps = (*requires SYNCHRONIZED*)
   if null deps then NONE
-  else if overloaded () then (worker_wait scheduler_event; join_next deps)
   else
     (case change_result queue (Task_Queue.dequeue_towards deps) of
       (NONE, []) => NONE
isabelle