exception DisambiguationError of
int * (Token.flocation option * string Lazy.t) list list
+(** initially false; for debugging only (???) *)
+val only_one_pass: bool ref
+
type choose_uris_callback = id:string -> UriManager.uri list -> UriManager.uri list
type choose_interp_callback =
string -> int -> (Token.flocation list * string * string) list list ->