aboutsummaryrefslogtreecommitdiff
path: root/pretyping
diff options
context:
space:
mode:
authorherbelin2002-12-21 11:51:33 +0000
committerherbelin2002-12-21 11:51:33 +0000
commit0dece739c580b39d77708bb8117442e7e1cd560b (patch)
tree3db834fd12224590c4feddd213a41a0edd7c4986 /pretyping
parent094b40758cb4278b33a87e5633cf4ac716f348b4 (diff)
Légère amélioration des messages d'erreur des with-bindings et des Rewrite
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3474 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping')
-rw-r--r--pretyping/rawterm.ml2
-rw-r--r--pretyping/rawterm.mli2
2 files changed, 2 insertions, 2 deletions
diff --git a/pretyping/rawterm.ml b/pretyping/rawterm.ml
index 9354035497..8ea4a25c3d 100644
--- a/pretyping/rawterm.ml
+++ b/pretyping/rawterm.ml
@@ -35,7 +35,7 @@ type binder_kind = BProd | BLambda | BLetIn
type quantified_hypothesis = AnonHyp of int | NamedHyp of identifier
-type 'a explicit_substitution = (quantified_hypothesis * 'a) list
+type 'a explicit_substitution = (loc * quantified_hypothesis * 'a) list
type 'a substitution =
| ImplicitBindings of 'a list
diff --git a/pretyping/rawterm.mli b/pretyping/rawterm.mli
index 3c2241682b..981cb23314 100644
--- a/pretyping/rawterm.mli
+++ b/pretyping/rawterm.mli
@@ -35,7 +35,7 @@ type binder_kind = BProd | BLambda | BLetIn
type quantified_hypothesis = AnonHyp of int | NamedHyp of identifier
-type 'a explicit_substitution = (quantified_hypothesis * 'a) list
+type 'a explicit_substitution = (loc * quantified_hypothesis * 'a) list
type 'a substitution =
| ImplicitBindings of 'a list