X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2FdisambiguatingParser.mli;h=a8afd0e65c3a0e23d6846e4b79e75984aacc207b;hb=afd3b379d4959e4a18c1f26f25e4a9c14997866f;hp=6edb842399971bd37f73bd0d20229fc4e7b1371d;hpb=12809955a4a6c693072f5b924603165f83cc382e;p=helm.git diff --git a/helm/gTopLevel/disambiguatingParser.mli b/helm/gTopLevel/disambiguatingParser.mli index 6edb84239..a8afd0e65 100644 --- a/helm/gTopLevel/disambiguatingParser.mli +++ b/helm/gTopLevel/disambiguatingParser.mli @@ -25,24 +25,24 @@ 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 -> + dbd:Mysql.dbd -> Cic.context -> Cic.metasenv -> string -> - Environment.t -> (* previous interpretation status *) - Environment.t * (* new interpretation status *) - Cic.metasenv * (* new metasenv *) - Cic.term (* disambiguated term *) + EnvironmentP3.t -> (* previous interpretation status *) + (EnvironmentP3.t * (* new interpretation status *) + Cic.metasenv * (* new metasenv *) + Cic.term) list (* disambiguated term *) end