sig
val create :
?message:string ->
?close_on_exec:bool ->
?unlink_on_exit:bool -> string -> bool Import.Deferred.t
val create_exn :
?message:string ->
?close_on_exec:bool ->
?unlink_on_exit:bool -> string -> unit Import.Deferred.t
val waiting_create :
?message:string ->
?close_on_exec:bool ->
?unlink_on_exit:bool -> string -> unit Import.Deferred.t
val is_locked : string -> bool Import.Deferred.t
val ounit_tests : unit -> OUnit.test
end