Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/Pure/Concurrent/future.ML
changeset 49910 db618c65a01d
parent 49908 8a23e8a6bc02
child 49935 d1ecb3554b25 
--- a/src/Pure/Concurrent/future.ML	Thu Oct 18 13:26:49 2012 +0200
+++ b/src/Pure/Concurrent/future.ML	Thu Oct 18 13:53:02 2012 +0200
@@ -563,7 +563,7 @@
 fun map_future f x =
   let
     val task = task_of x;
-    val group = new_group (SOME (Task_Queue.group_of_task task));
+    val group = Task_Queue.group_of_task task;
     val (result, job) = future_job group true (fn () => f (join x));
 
     val extended = SYNCHRONIZED "extend" (fn () =>
isabelle