From: Stefano Zacchiroli Date: Tue, 20 Apr 2004 17:00:27 +0000 (+0000) Subject: got rid of ~status label X-Git-Tag: dead_dir_walking~23 X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=commitdiff_plain;h=9e7e14a98d5b6c728f980979f21d542d829d9b98 got rid of ~status label --- diff --git a/helm/gTopLevel/proofEngine.ml b/helm/gTopLevel/proofEngine.ml index 1d6ce4f20..20863f1a9 100644 --- a/helm/gTopLevel/proofEngine.ml +++ b/helm/gTopLevel/proofEngine.ml @@ -61,7 +61,7 @@ let apply_tactic ~tactic = | None,_ | _,None -> assert false | Some proof', Some goal' -> - let (newproof, newgoals) = tactic ~status:(proof', goal') in + let (newproof, newgoals) = tactic (proof', goal') in set_proof (Some newproof); goal := (match newgoals, newproof with