X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic_disambiguation%2FdisambiguateTypes.mli;h=b584f0bec25437ea993cd3aa35108c171e539e84;hb=8f9d476c32c48d14348a61889dc191c7696bd404;hp=4f4b3c3ecdb49d2d9acde5b8573dde45f968c214;hpb=0a910e65848253fc6c7b20231f5bc8482097b29c;p=helm.git

diff --git a/helm/software/components/cic_disambiguation/disambiguateTypes.mli b/helm/software/components/cic_disambiguation/disambiguateTypes.mli
index 4f4b3c3ec..b584f0bec 100644
--- a/helm/software/components/cic_disambiguation/disambiguateTypes.mli
+++ b/helm/software/components/cic_disambiguation/disambiguateTypes.mli
@@ -71,12 +71,13 @@ module type Callbacks =
        UriManager.uri list
 
       val interactive_interpretation_choice :
-      (string * string) list list -> int list
+        string -> int ->
+      (Token.flocation list * string * string) list list -> int list
 
     (** @param title gtk window title for user prompting
      * @param id unbound identifier which originated this callback invocation *)
     val input_or_locate_uri:
-      title:string -> ?id:string -> unit -> UriManager.uri
+      title:string -> ?id:string -> unit -> UriManager.uri option
   end
 
 val string_of_domain_item: domain_item -> string