X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2FmatitaScript.mli;h=cfc4655414bc08acaca2528aa175fa93c85a8da6;hb=5104e38ee747fd1052ce21f3f9f2ecc778d590ba;hp=e407b090a42e85516e4875c7e4d85a19e0b8adf3;hpb=ebe70c001a623e0440f21cd16dc88f585edcf0ea;p=helm.git

diff --git a/helm/matita/matitaScript.mli b/helm/matita/matitaScript.mli
index e407b090a..cfc465541 100644
--- a/helm/matita/matitaScript.mli
+++ b/helm/matita/matitaScript.mli
@@ -23,6 +23,9 @@
  * http://helm.cs.unibo.it/
  *)
 
+exception NoUnfinishedProof
+exception ActionCancelled
+
 class type script =
 object
 
@@ -31,11 +34,13 @@ object
   method error_tag : GText.tag
 
   (** @return current status *)
-  method status: GrafiteTypes.status
+  method lexicon_status: LexiconEngine.status
+  method grafite_status: GrafiteTypes.status
     
   (** {2 Observers} *)
 
-  method addObserver : (GrafiteTypes.status -> unit) -> unit
+  method addObserver :
+   (LexiconEngine.status -> GrafiteTypes.status -> unit) -> unit
 
   (** {2 History} *)
 
@@ -63,8 +68,8 @@ object
   method proofConclusion: Cic.term            (** @raise Statement_error *)
   method stack: Continuationals.Stack.t       (** @raise Statement_error *)
 
-  method setGoal: int -> unit
-  method goal: int
+  method setGoal: int option -> unit
+  method goal: int option
 
   (** end of script, true if the whole script has been executed *)
   method eos: bool
@@ -81,7 +86,6 @@ end
    * "*") on the side of a script name *)
 val script: 
   source_view:GSourceView.source_view -> 
-  init:GrafiteTypes.status -> 
   mathviewer: MatitaTypes.mathViewer-> 
   urichooser: (UriManager.uri list -> UriManager.uri list) -> 
   develcreator: (containing:string option -> unit) ->