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.
clarified Goal.stable_futures after 00170ef1dc39: running tasks are considered stable, without potentially blocking join;
authorwenzelm
Sat, 27 Jul 2013 20:27:25 +0200
changeset 52738 8db0db07bd96
parent 52737 7b396ef36af6
child 52739 e4b8b2927a52
clarified Goal.stable_futures after 00170ef1dc39: running tasks are considered stable, without potentially blocking join;
src/Pure/goal.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/goal.ML	Sat Jul 27 17:34:56 2013 +0200
+++ b/src/Pure/goal.ML	Sat Jul 27 20:27:25 2013 +0200
@@ -182,7 +182,7 @@
   Inttab.lookup_list (#3 (Synchronized.value forked_proofs)) id;
 
 fun stable_futures id =
-  not (Par_Exn.is_interrupted (Future.join_results (peek_futures id)));
+  not (Par_Exn.is_interrupted (map_filter Future.peek (peek_futures id)));
 
 fun reset_futures () =
   Synchronized.change_result forked_proofs (fn (_, groups, _) =>
isabelle