X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2FmatitaGuiTypes.mli;h=f2376406a07009a1f03aa17fb87c0dd4aa0708dd;hb=c83721701dbbd44d3d547fdec6c4a5658322f424;hp=51c700dc3177067a959c44072013416e5ac7e49b;hpb=a970a6b5d44947e466b94ff3df4fa66d85d0d9ca;p=helm.git

diff --git a/helm/software/matita/matitaGuiTypes.mli b/helm/software/matita/matitaGuiTypes.mli
index 51c700dc3..f2376406a 100644
--- a/helm/software/matita/matitaGuiTypes.mli
+++ b/helm/software/matita/matitaGuiTypes.mli
@@ -124,9 +124,11 @@ object
 
     (** load a sequent and render it into parent widget *)
   method load_sequent: Cic.metasenv -> int -> unit
-  method nload_sequent: NCic.metasenv -> NCic.substitution -> int -> unit
+  method nload_sequent:
+   #NCicCoercion.status -> NCic.metasenv -> NCic.substitution -> int -> unit
 
   method load_object: Cic.obj -> unit
+  method load_nobject: #NCicCoercion.status -> NCic.obj -> unit
 end
 
 class type sequentsViewer =
@@ -134,9 +136,11 @@ object
   method reset: unit
   method load_logo: unit
   method load_logo_with_qed: unit
-  method load_sequents: GrafiteTypes.incomplete_proof -> unit
-  method nload_sequents: NTacStatus.tac_status -> unit
-  method goto_sequent: int -> unit  (* to be called _after_ load_sequents *)
+  method load_sequents:
+   #NCicCoercion.status -> GrafiteTypes.incomplete_proof -> unit
+  method nload_sequents: #NTacStatus.tac_status -> unit
+  method goto_sequent:
+   #NCicCoercion.status -> int -> unit (* to be called _after_ load_sequents *)
 
   method cicMathView: cicMathView
 end