aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/typeops.mli
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2001-11-08 14:10:21 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2001-11-08 14:10:21 +0000
commit25ea09274a8b085092963fcccf0400f8826f5544 (patch)
tree3cddd41152c9efec8baccf65553164ab8cae8513 /kernel/typeops.mli
parent8640627fa00798b429baf56937a66f1621be0a02 (diff)
Rétablissement de la persistance des Cast; typage des LetIn sans recours à Cast
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2171 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/typeops.mli')
-rw-r--r--kernel/typeops.mli4
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/typeops.mli b/kernel/typeops.mli
index 24ffa47b1..1605328cb 100644
--- a/kernel/typeops.mli
+++ b/kernel/typeops.mli
@@ -68,8 +68,8 @@ val judge_of_product :
(* s Type of a let in. *)
val judge_of_letin :
- env -> name -> unsafe_judgment -> unsafe_judgment
- -> unsafe_judgment
+ env -> name -> unsafe_judgment -> unsafe_type_judgment -> unsafe_judgment
+ -> unsafe_judgment * constraints
(*s Type of a cast. *)
val judge_of_cast :