X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matitaB%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.mli;h=0351b261158572ea83a899853b1f8b22606e58c1;hb=41b61472d2c475e0f69e3dfc85539da3ad2bac1e;hp=90fdbb52ee874f889f9ada8bfe21570e0ff750d8;hpb=6d4277977478ef9bcadaffbef3d4bb04ac0250a5;p=helm.git

diff --git a/matitaB/components/grafite_engine/grafiteTypes.mli b/matitaB/components/grafite_engine/grafiteTypes.mli
index 90fdbb52e..0351b2611 100644
--- a/matitaB/components/grafite_engine/grafiteTypes.mli
+++ b/matitaB/components/grafite_engine/grafiteTypes.mli
@@ -32,7 +32,7 @@ exception Command_error of string
 val command_error: string -> 'a   (** @raise Command_error *)
 
 class virtual status :
- string ->
+ string option -> string ->
   object ('self)
    (* Warning: #stack and #obj are meaningful iff #ng_mode is `ProofMode *)
    inherit NTacStatus.tac_status