aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxime Dénès2017-03-14 17:30:14 +0100
committerMaxime Dénès2017-03-14 17:30:14 +0100
commit6bc24c43fa491d7a658da3a071173c51ef713a39 (patch)
treeca5f3422470ca6b9220b612fdf58ce88b2d19ecc
parentecacc9af6100f76e95acc24e777026bfc9c4d921 (diff)
parent6d520f47e907010f556ef4ba24715607390460ef (diff)
Merge PR#446: Remove a dead exception catching code.
-rw-r--r--proofs/pfedit.ml7
1 files changed, 1 insertions, 6 deletions
diff --git a/proofs/pfedit.ml b/proofs/pfedit.ml
index 80bea0c3b1..b06ea43bdd 100644
--- a/proofs/pfedit.ml
+++ b/proofs/pfedit.ml
@@ -143,12 +143,7 @@ let solve ?with_end_tac gi info_lvl tac pr =
in
(p,status)
with
- | Proof_global.NoCurrentProof -> CErrors.error "No focused proof"
- | CList.IndexOutOfRange ->
- match gi with
- | Vernacexpr.SelectNth i -> let msg = str "No such goal: " ++ int i ++ str "." in
- CErrors.user_err msg
- | _ -> assert false
+ Proof_global.NoCurrentProof -> CErrors.error "No focused proof"
let by tac = Proof_global.with_current_proof (fun _ -> solve (Vernacexpr.SelectNth 1) None tac)