diff --git a/Fsdk/Process.fs b/Fsdk/Process.fs index 58123cb..2f07074 100644 --- a/Fsdk/Process.fs +++ b/Fsdk/Process.fs @@ -19,7 +19,7 @@ module Process = let myTicket = Interlocked.Increment ticketsCount Monitor.Enter innerLock - while myTicket <> Volatile.Read ticketToRide do + while myTicket <> ticketToRide.Value do Monitor.Wait innerLock |> ignore member __.Exit() =