X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.ml;h=66da43c8f36259edc8111f14014a658a42755f4b;hb=be2a030746e20744f9a317a31c7053bcfbb6e505;hp=244ce615f67f01542759a7a2cc1ecf23dc2a53e1;hpb=84e6cbe962c9a534be48542c098d7bb0d90be9a1;p=helm.git diff --git a/helm/software/components/grafite_engine/grafiteTypes.ml b/helm/software/components/grafite_engine/grafiteTypes.ml index 244ce615f..66da43c8f 100644 --- a/helm/software/components/grafite_engine/grafiteTypes.ml +++ b/helm/software/components/grafite_engine/grafiteTypes.ml @@ -44,13 +44,18 @@ type proof_status = (* Status in which the proof could be while it is being processed by the * engine. No status entering/exiting the engine could be in it. *) +type ng_status = + | ProofMode of NTacStatus.tac_status + | CommandMode of LexiconEngine.status + type status = { moo_content_rev: GrafiteMarshal.moo; proof_status: proof_status; objects: UriManager.uri list; coercions: CoercDb.coerc_db; - universe:Universe.universe; + automation_cache:AutomationCache.cache; baseuri: string; + ng_status: ng_status; } let get_current_proof status =