X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fgrafite_engine%2FgrafiteEngine.mli;h=334488dd396c72d7618285b087da65748b04b6c8;hb=42aa528129728611cae9da02904886522b08f94a;hp=e8ee448c5c7866eb483aa2b5e94310cae469f7d5;hpb=560db5569f54fba5bded568699a33947f88df3ba;p=helm.git diff --git a/matita/components/grafite_engine/grafiteEngine.mli b/matita/components/grafite_engine/grafiteEngine.mli index e8ee448c5..334488dd3 100644 --- a/matita/components/grafite_engine/grafiteEngine.mli +++ b/matita/components/grafite_engine/grafiteEngine.mli @@ -32,12 +32,11 @@ type 'a disambiguator_input = string * int * 'a val eval_ast : disambiguate_command: (GrafiteTypes.status -> - (GrafiteAst.command) disambiguator_input -> + GrafiteAst.command disambiguator_input -> GrafiteTypes.status * GrafiteAst.command) -> ?do_heavy_checks:bool -> GrafiteTypes.status -> - (* (('term, 'lazy_term, 'reduction, 'obj, 'ident) GrafiteAst.statement) *) GrafiteAst.statement disambiguator_input -> (* the new status and generated objects, if any *) GrafiteTypes.status * [`Old of UriManager.uri list | `New of NUri.uri list]