type choose_interp_callback = (string * string) list list -> int list
val set_choose_uris_callback: choose_uris_callback -> unit
type choose_interp_callback = (string * string) list list -> int list
val set_choose_uris_callback: choose_uris_callback -> unit