module Current_libname: sig .. end
sig
end
val set : string -> unit
string -> unit
val unset : unit -> unit
unit -> unit