unificatiom hints with premises

[helm.git] / helm / software / components / disambiguation / disambiguate.mli

diff --git a/helm/software/components/disambiguation/disambiguate.mli b/helm/software/components/disambiguation/disambiguate.mli
index cb1882a7d12a900b0e51a39c4e943c32786c623d..822f14092db739a83cc25e272ada2908f3e64afc 100644 (file)
--- a/helm/software/components/disambiguation/disambiguate.mli
+++ b/helm/software/components/disambiguation/disambiguate.mli
@@ -81,8 +81,6 @@ val resolve :
    [`Num_arg of string | `Args of 'term list] -> 'term
 
 val find_in_context: string -> string option list -> int
-val domain_of_ast_term: context:
-  string option list -> CicNotationPt.term -> domain
 val domain_of_term: context:
   string option list -> CicNotationPt.term -> domain
 val domain_of_obj: 
@@ -123,8 +121,8 @@ val disambiguate_thing:
     'metasenv -> 'subst -> 'context -> 'uri -> use_coercions:bool ->
     'raw_thing -> 'ugraph -> localization_tbl:'cichash -> 
       ('refined_thing, 'metasenv,'subst,'ugraph) test_result) ->
-  localization_tbl:'cichash ->
-  string * int * 'ast_thing ->
+  mk_localization_tbl:(int -> 'cichash) ->
+  'ast_thing disambiguator_input ->
   ((DisambiguateTypes.Environment.key * 'alias) list * 
    'metasenv * 'subst * 'refined_thing * 'ugraph)
   list * bool