module Mutex:sig..end
typet =int * OUnitShared.scope
val create : 'a -> int * 'aval lock : OUnitShared.shared -> int * OUnitShared.scope -> unitval try_lock : OUnitShared.shared -> int * OUnitShared.scope -> boolval unlock : OUnitShared.shared -> int * OUnitShared.scope -> unitval with_lock : OUnitShared.shared -> int * OUnitShared.scope -> (unit -> 'a) -> 'a