aboutsummaryrefslogtreecommitdiff
path: root/interp/tactypes.ml
diff options
context:
space:
mode:
authorMaxime Dénès2018-03-10 10:03:50 +0100
committerMaxime Dénès2018-03-10 10:03:50 +0100
commit93a1c4786c9b17efdda025f754ad97376d61a9ba (patch)
tree9ffa30a21f0d5b80aaeae66955e652f185929498 /interp/tactypes.ml
parent5f989f48eaaf5e13568fce9849f40bc554ca0166 (diff)
parent4af41a12a0e7e6b17d25a71568641bd03d5e1f94 (diff)
Merge PR #6831: [located] More work towards using CAst.t
Diffstat (limited to 'interp/tactypes.ml')
-rw-r--r--interp/tactypes.ml9
1 files changed, 4 insertions, 5 deletions
diff --git a/interp/tactypes.ml b/interp/tactypes.ml
index fc0f8de5fd..83e42be89f 100644
--- a/interp/tactypes.ml
+++ b/interp/tactypes.ml
@@ -12,7 +12,6 @@
lower API. It's not clear whether this is a temporary API or if this is
meant to stay. *)
-open Loc
open Names
open Constrexpr
open Pattern
@@ -29,7 +28,7 @@ type 'a delayed_open = Environ.env -> Evd.evar_map -> Evd.evar_map * 'a
type delayed_open_constr = EConstr.constr delayed_open
type delayed_open_constr_with_bindings = EConstr.constr with_bindings delayed_open
-type intro_pattern = delayed_open_constr intro_pattern_expr located
-type intro_patterns = delayed_open_constr intro_pattern_expr located list
-type or_and_intro_pattern = delayed_open_constr or_and_intro_pattern_expr located
-type intro_pattern_naming = intro_pattern_naming_expr located
+type intro_pattern = delayed_open_constr intro_pattern_expr CAst.t
+type intro_patterns = delayed_open_constr intro_pattern_expr CAst.t list
+type or_and_intro_pattern = delayed_open_constr or_and_intro_pattern_expr CAst.t
+type intro_pattern_naming = intro_pattern_naming_expr CAst.t