X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.mli;h=92d4cc2aa446798f06303e9b8732776e3abe8622;hb=9861eb06735d8a60c41687efea26ccd81c67b9c8;hp=92af84babd4d0aecd2a6b5eae5a9f12b82a15044;hpb=53a5acbe28212706be9c684d612aee1ccb165587;p=helm.git diff --git a/matita/components/grafite_engine/grafiteTypes.mli b/matita/components/grafite_engine/grafiteTypes.mli index 92af84bab..92d4cc2aa 100644 --- a/matita/components/grafite_engine/grafiteTypes.mli +++ b/matita/components/grafite_engine/grafiteTypes.mli @@ -31,13 +31,15 @@ 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 *) inherit NTacStatus.tac_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]