From 1a1ee340de86b6688a8ceeec5eaa8e76032fe3f3 Mon Sep 17 00:00:00 2001 From: aspiwack Date: Sat, 2 Nov 2013 15:34:09 +0000 Subject: Getting rid of Goal.here, and all the related exceptions and combinators. It was a bad idea. The new API based on lists seems more sensible. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16969 85f007b7-540e-0410-9357-904b9bb8a0f7 --- proofs/proof.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'proofs/proof.ml') diff --git a/proofs/proof.ml b/proofs/proof.ml index 712845f58..89f3638a1 100644 --- a/proofs/proof.ml +++ b/proofs/proof.ml @@ -252,7 +252,7 @@ let initial_goals p = Proofview.initial_goals p.proofview let run_tactic env tac pr = let sp = pr.proofview in - let tacticced_proofview = Proofview.apply env tac sp in + let (_,tacticced_proofview) = Proofview.apply env tac sp in { pr with proofview = tacticced_proofview } let emit_side_effects eff pr = -- cgit v1.2.3