tuned scope of Multithreading.interrupted vs. Multithreading.with_attributes;
authorwenzelm
Wed, 09 Feb 2011 15:48:43 +0100
changeset 41737 1b225934c09d
parent 41736 02978b058ca9
child 41738 eb98c60a6cf0
tuned scope of Multithreading.interrupted vs. Multithreading.with_attributes;
src/Pure/Concurrent/future.ML
--- a/src/Pure/Concurrent/future.ML	Wed Feb 09 08:42:23 2011 +0100
+++ b/src/Pure/Concurrent/future.ML	Wed Feb 09 15:48:43 2011 +0100
@@ -182,8 +182,8 @@
           if ok then
             Exn.capture (fn () =>
               Multithreading.with_attributes Multithreading.private_interrupts
-                (fn _ =>
-                  Position.setmp_thread_data pos e () before Multithreading.interrupted ())) ()
+                (fn _ => Position.setmp_thread_data pos e ()) before
+              Multithreading.interrupted ()) ()
           else Exn.interrupt_exn;
       in assign_result group result res end;
   in (result, job) end;