diff options
| author | letouzey | 2012-05-29 11:09:03 +0000 |
|---|---|---|
| committer | letouzey | 2012-05-29 11:09:03 +0000 |
| commit | 4a39b5cb9841a9e11b745bce0d3dc2bc86d6b185 (patch) | |
| tree | ab90f9acc3dc2038ea17367afb2cc4285a77f1b2 /tactics | |
| parent | a3ab8b07b912afd1b883ed60bd532b5a29bccd8f (diff) | |
Basic stuff about constr_expr migrated from topconstr to constrexpr_ops
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15382 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/extratactics.ml4 | 2 | ||||
| -rw-r--r-- | tactics/tacinterp.ml | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tactics/extratactics.ml4 b/tactics/extratactics.ml4 index a74bdad29b..db55f6434a 100644 --- a/tactics/extratactics.ml4 +++ b/tactics/extratactics.ml4 @@ -250,7 +250,7 @@ TACTIC EXTEND rewrite_star let add_rewrite_hint name ort t lcsr = let env = Global.env() and sigma = Evd.empty in - let f c = Topconstr.constr_loc c, Constrintern.interp_constr sigma env c, ort, t in + let f c = Constrexpr_ops.constr_loc c, Constrintern.interp_constr sigma env c, ort, t in add_rew_rules name (List.map f lcsr) VERNAC COMMAND EXTEND HintRewrite diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml index 462ffdc387..a0fd61c06d 100644 --- a/tactics/tacinterp.ml +++ b/tactics/tacinterp.ml @@ -34,7 +34,7 @@ open Refiner open Tacmach open Tactic_debug open Constrexpr -open Topconstr +open Constrexpr_ops open Term open Termops open Tacexpr |