diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2013-12-11 00:03:58 +0100 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2013-12-11 00:05:55 +0100 |
commit | 4832692db5c21c178ff5825fc75496543f02875a (patch) | |
tree | 1944ec753817ede75b0f839feba8984a92e08b14 /proofs/proof.ml | |
parent | 916829e62f7634c2ce9d991eb8ce30a7b1e919d3 (diff) |
Fixing backtrace registering of various tactic-related try-with blocks.
Diffstat (limited to 'proofs/proof.ml')
-rw-r--r-- | proofs/proof.ml | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/proofs/proof.ml b/proofs/proof.ml index 9e6045661..aafacaeb3 100644 --- a/proofs/proof.ml +++ b/proofs/proof.ml @@ -326,11 +326,9 @@ module V82 = struct { p with proofview = Proofview.V82.grab p.proofview } - let instantiate_evar n com pr = - let sp = pr.proofview in - try - let new_proofview = Proofview.V82.instantiate_evar n com sp in - { pr with proofview = new_proofview } - with e -> - raise e + let instantiate_evar n com pr = + let sp = pr.proofview in + let new_proofview = Proofview.V82.instantiate_evar n com sp in + { pr with proofview = new_proofview } + end |