Module Current_sesame.Watcher
val create : unit -> ('a, 'b) Stdlib.Hashtbl.tval record : path:'a -> job_id:'b -> ('a, 'b) Stdlib.Hashtbl.t -> unitval get_job_id : 'a Current.t -> Current.job_id option Current.tval job_id : path:'a -> ('a, 'b) Stdlib.Hashtbl.t -> 'b option
module FS : sig ... endmodule Js : sig ... end