sig   type t = B0.Def.loc   val none : B0.Def.loc   val lib : string -> B0.Def.loc   val file : B0.Fpath.t -> B0.Def.loc   val is_none : B0.Def.loc -> bool   val find_file : B0.Def.loc -> B0.Fpath.t option   val equal : B0.Def.loc -> B0.Def.loc -> bool   val compare : B0.Def.loc -> B0.Def.loc -> int   val pp : B0.Def.loc B0.Fmt.t   val set_root : B0.Fpath.t option -> unit   val get_root : unit -> B0.Fpath.t option   val set_sub_root : B0.Fpath.t option -> unit   val get_sub_root : unit -> B0.Fpath.t option   val set_current : B0.Def.loc -> unit   val get_current : unit -> B0.Def.loc end