X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_parser%2FgrafiteDisambiguator.mli;h=88940c2c3818bd40cd30c5e707295ceae1e79bfb;hb=6a5e51c1cf9a56c74a8b53a9b8bc5aa686c9780e;hp=b7c85f6af68eed6153ba8466d751739a36933633;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git diff --git a/helm/software/components/grafite_parser/grafiteDisambiguator.mli b/helm/software/components/grafite_parser/grafiteDisambiguator.mli index b7c85f6af..88940c2c3 100644 --- a/helm/software/components/grafite_parser/grafiteDisambiguator.mli +++ b/helm/software/components/grafite_parser/grafiteDisambiguator.mli @@ -28,10 +28,19 @@ exception Ambiguous_input (* the integer is an offset to be added to each location *) exception DisambiguationError of - int * (Token.flocation option * string Lazy.t) list list + int * + ((Stdpp.location list * string * string) list * + (DisambiguateTypes.domain_item * DisambiguateTypes.codomain_item) list * + Stdpp.location option * string Lazy.t * bool) list list + (** parameters are: option name, error message *) + +(** 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 * string) list list -> int list +type choose_interp_callback = + string -> int -> (Stdpp.location list * string * string) list list -> + int list val set_choose_uris_callback: choose_uris_callback -> unit val set_choose_interp_callback: choose_interp_callback -> unit