aboutsummaryrefslogtreecommitdiff
path: root/contrib/cc
diff options
context:
space:
mode:
authorbarras2004-01-09 19:02:58 +0000
committerbarras2004-01-09 19:02:58 +0000
commitb1bd8f2a50863a6ca77b6f05b3f1756648cfe936 (patch)
treef9ab63c12f45c28bcc9320712e401c6ef32f26a1 /contrib/cc
parentc4bc84f02c7d22402824514d70c6d5e66f511bfc (diff)
bugs avec Pose et Assert
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5190 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/cc')
-rw-r--r--contrib/cc/cctac.ml42
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/cc/cctac.ml4 b/contrib/cc/cctac.ml4
index 3d6463d1d9..9de5e3a2d0 100644
--- a/contrib/cc/cctac.ml4
+++ b/contrib/cc/cctac.ml4
@@ -208,7 +208,7 @@ let cc_tactic gls=
[|outtype;trivial;pred;identity;concl;injt|]) in
let neweq=
mkApp(constr_of_reference Coqlib.glob_eq,[|intype;tt1;tt2|]) in
- tclTHENS (true_cut (Some hid) neweq)
+ tclTHENS (true_cut (Name hid) neweq)
[proof_tac axioms p;exact_check endt] gls
(* Tactic registration *)