X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2FdisambiguatingParser.mli;h=710401f4a35f01383e8a8fc141160b5408ecf6ec;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=6edb842399971bd37f73bd0d20229fc4e7b1371d;hpb=12809955a4a6c693072f5b924603165f83cc382e;p=helm.git diff --git a/helm/gTopLevel/disambiguatingParser.mli b/helm/gTopLevel/disambiguatingParser.mli index 6edb84239..710401f4a 100644 --- a/helm/gTopLevel/disambiguatingParser.mli +++ b/helm/gTopLevel/disambiguatingParser.mli @@ -25,24 +25,26 @@ exception NoWellTypedInterpretation -module Environment : +module EnvironmentP3 : sig type t - val empty : t + val empty : string val to_string : t -> string val of_string : string -> t end -module Make (C : Disambiguate_types.Callbacks) : +module Make (C : DisambiguateTypes.Callbacks) : sig val disambiguate_term : - MQIConn.handle -> - Cic.context -> - Cic.metasenv -> + dbd:Mysql.dbd -> + context:Cic.context -> + metasenv:Cic.metasenv -> + ?initial_ugraph:CicUniv.universe_graph -> + aliases:EnvironmentP3.t -> (* previous interpretation status *) string -> - Environment.t -> (* previous interpretation status *) - Environment.t * (* new interpretation status *) - Cic.metasenv * (* new metasenv *) - Cic.term (* disambiguated term *) + (EnvironmentP3.t * (* new interpretation status *) + Cic.metasenv * (* new metasenv *) + Cic.term * + CicUniv.universe_graph) list (* disambiguated term *) end