X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.ml;h=66da43c8f36259edc8111f14014a658a42755f4b;hb=a9c8d96d47a5895c99bca2fe93decf464bca62c3;hp=aa90dc0e0194951ae1f87f711ef3c4994b7d7806;hpb=b225178112c2c5ef1a717ac7e647d854d94b2e52;p=helm.git

diff --git a/helm/software/components/grafite_engine/grafiteTypes.ml b/helm/software/components/grafite_engine/grafiteTypes.ml
index aa90dc0e0..66da43c8f 100644
--- a/helm/software/components/grafite_engine/grafiteTypes.ml
+++ b/helm/software/components/grafite_engine/grafiteTypes.ml
@@ -44,14 +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: NTactics.tac_status option;
+  ng_status: ng_status;
 }
 
 let get_current_proof status =