X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaDisambiguator.mli;h=7e207e12fd7970f742daed95357c959d784dbb5e;hb=97c2d258a5c524eb5c4b85208899d80751a2c82f;hp=8397e4dbff59017056ab2dbb92fa43a1669c7daa;hpb=56415e42c04f40e9c8f7cfc59a3a3d87c3d373f7;p=helm.git diff --git a/helm/matita/matitaDisambiguator.mli b/helm/matita/matitaDisambiguator.mli index 8397e4dbf..7e207e12f 100644 --- a/helm/matita/matitaDisambiguator.mli +++ b/helm/matita/matitaDisambiguator.mli @@ -1,4 +1,4 @@ -(* Copyright (C) 2004, HELM Team. +(* Copyright (C) 2004-2005, HELM Team. * * This file is part of HELM, an Hypertextual, Electronic * Library of Mathematics, developed at the Computer Science @@ -23,13 +23,29 @@ * http://helm.cs.unibo.it/ *) -class parserr: unit -> MatitaTypes.parserr +open MatitaTypes -class disambiguator: - parserr:MatitaTypes.parserr -> (** parser *) - mqiconn:MQIConn.handle -> (** mathql database connection *) - chooseUris:MatitaTypes.choose_uris_callback -> - chooseInterp:MatitaTypes.choose_interp_callback -> - unit -> - MatitaTypes.disambiguator +(** raised when ambiguous input is found but not expected (e.g. in the batch + * compiler) *) +exception Ambiguous_input +exception DisambiguationError of string Lazy.t list list +type choose_uris_callback = id:string -> UriManager.uri list -> UriManager.uri list +type choose_interp_callback = (string * string) list list -> int list + +val set_choose_uris_callback: choose_uris_callback -> unit +val set_choose_interp_callback: choose_interp_callback -> unit + +(** @raise Ambiguous_input if called, default value for internal + * choose_uris_callback if not set otherwise with set_choose_uris_callback + * above *) +val mono_uris_callback: choose_uris_callback + +(** @raise Ambiguous_input if called, default value for internal + * choose_interp_callback if not set otherwise with set_choose_interp_callback + * above *) +val mono_interp_callback: choose_interp_callback + +(** for GUI callbacks see MatitaGui.interactive_{interp,user_uri}_choice *) + +include Disambiguate.Disambiguator