X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.mli;h=92d4cc2aa446798f06303e9b8732776e3abe8622;hb=dba584374a26ef04c53306c89e5567e637e6553e;hp=fd89f464880d3a3d85be4ea594ac5804d9fad8af;hpb=cd664aefb80554952ed9b010f0c5199ce3a6f8f2;p=helm.git

diff --git a/matita/components/grafite_engine/grafiteTypes.mli b/matita/components/grafite_engine/grafiteTypes.mli
index fd89f4648..92d4cc2aa 100644
--- a/matita/components/grafite_engine/grafiteTypes.mli
+++ b/matita/components/grafite_engine/grafiteTypes.mli
@@ -31,7 +31,7 @@ exception Command_error of string
 
 val command_error: string -> 'a   (** @raise Command_error *)
 
-class status :
+class virtual status :
  string ->
   object ('self)
    (* Warning: #stack and #obj are meaningful iff #ng_mode is `ProofMode *)
@@ -39,6 +39,7 @@ class status :
    inherit NCicLibrary.dumpable_status
    inherit NCicLibrary.status
    inherit GrafiteParser.status
+   inherit TermContentPres.status
    method baseuri: string
    method set_baseuri: string -> 'self
    method ng_mode: [`ProofMode | `CommandMode]