]> matita.cs.unibo.it Git - helm.git/blobdiff - components/cic_disambiguation/disambiguateTypes.mli
...
[helm.git] / components / cic_disambiguation / disambiguateTypes.mli
index 4f4b3c3ecdb49d2d9acde5b8573dde45f968c214..b584f0bec25437ea993cd3aa35108c171e539e84 100644 (file)
@@ -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