From 4a39b5cb9841a9e11b745bce0d3dc2bc86d6b185 Mon Sep 17 00:00:00 2001
From: letouzey
Date: Tue, 29 May 2012 11:09:03 +0000
Subject: 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
---
 tactics/extratactics.ml4 | 2 +-
 tactics/tacinterp.ml     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'tactics')

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
-- 
cgit v1.2.3