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
end