From 25ea09274a8b085092963fcccf0400f8826f5544 Mon Sep 17 00:00:00 2001 From: herbelin Date: Thu, 8 Nov 2001 14:10:21 +0000 Subject: Rétablissement de la persistance des Cast; typage des LetIn sans recours à Cast MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2171 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/typeops.mli | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'kernel/typeops.mli') 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 : -- cgit v1.2.3