sig
  val create : path:string -> message:string -> bool
  val create_exn : path:string -> message:string -> unit
  val create_pid : path:string -> bool
  val create_pid_exn : path:string -> unit
  val blocking_create : path:string -> message:string -> unit
  val is_locked : string -> bool
end