added #proofConclusion

diff --git a/helm/matita/matitaScript.ml b/helm/matita/matitaScript.ml
index 48cc9111bdad5c9c8511ef8f36d35ef1ee3a4145..e3dec088b4034ab8331e578814873c567dbe527f 100644 (file)
--- a/helm/matita/matitaScript.ml
+++ b/helm/matita/matitaScript.ml
@@ -707,6 +707,7 @@ object (self)
   method proofStatus = MatitaMisc.get_proof_status self#status
   method proofMetasenv = MatitaMisc.get_proof_metasenv self#status
   method proofContext = MatitaMisc.get_proof_context self#status
+  method proofConclusion = MatitaMisc.get_proof_conclusion self#status
   method setGoal n = userGoal <- n
 
   method eos = 

diff --git a/helm/matita/matitaScript.mli b/helm/matita/matitaScript.mli
index 2cc559a3b0a790e751c8f9e466b90129eb3a329f..8c776685a5a2b457993df59d3e90170cd4f6650b 100644 (file)
--- a/helm/matita/matitaScript.mli
+++ b/helm/matita/matitaScript.mli
@@ -58,6 +58,7 @@ object
   method proofStatus: ProofEngineTypes.status (** @raise Statement_error *)
   method proofMetasenv: Cic.metasenv          (** @raise Statement_error *)
   method proofContext: Cic.context            (** @raise Statement_error *)
+  method proofConclusion: Cic.term            (** @raise Statement_error *)
 
   method setGoal: int -> unit