| changeset 62891 | 7a11ea5c9626 |
| parent 62819 | d3ff367a16a0 |
| child 62918 | 2fcbd4abc021 |
--- a/src/Pure/Concurrent/synchronized.ML Wed Apr 06 16:51:52 2016 +0200 +++ b/src/Pure/Concurrent/synchronized.ML Wed Apr 06 17:16:30 2016 +0200 @@ -51,7 +51,7 @@ | Exn.Res false => NONE | Exn.Exn exn => Exn.reraise exn) | SOME (y, x') => - uninterruptible (fn _ => fn () => + Multithreading.uninterruptible (fn _ => fn () => (var := x'; ConditionVar.broadcast cond; SOME y)) ()) end; in try_change () end);