From 76cb7a13d714639a8f4d448416dddda86e86f9fb Mon Sep 17 00:00:00 2001 From: msozeau Date: Wed, 5 Jun 2013 11:55:11 +0000 Subject: Use a Summary.ref for the tactic in tactic options for proper backtracking and handling of locality (fixes FingerTree contrib). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16560 85f007b7-540e-0410-9357-904b9bb8a0f7 --- tactics/tactic_option.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tactics/tactic_option.ml b/tactics/tactic_option.ml index 7a13890b57..fdd5a9aaed 100644 --- a/tactics/tactic_option.ml +++ b/tactics/tactic_option.ml @@ -15,7 +15,7 @@ let declare_tactic_option ?(default=Tacexpr.TacId []) name = Summary.ref default ~name:(name^"-default-tacexpr") in let default_tactic : Proof_type.tactic ref = - ref (Tacinterp.eval_tactic !default_tactic_expr) + Summary.ref (Tacinterp.eval_tactic !default_tactic_expr) ~name:(name^"-default-tactic") in let set_default_tactic local t = locality := local; -- cgit v1.2.3