From c4aad6897210f9e55cb41a9dd40fc1fd01321f6b Mon Sep 17 00:00:00 2001 From: filliatr Date: Mon, 29 Nov 1999 12:59:36 +0000 Subject: commentaires supprimmés 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@160 85f007b7-540e-0410-9357-904b9bb8a0f7 --- parsing/astterm.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'parsing/astterm.ml') diff --git a/parsing/astterm.ml b/parsing/astterm.ml index a6fa07f66..fddb47804 100644 --- a/parsing/astterm.ml +++ b/parsing/astterm.ml @@ -703,7 +703,7 @@ let fconstr_of_com_sort sigma sign com = fconstr_of_com1 true sigma sign com (* Note: typ is retyped *) -(*** + let constr_of_com_casted sigma env com typ = let sign = context env in let c = raw_constr_of_com sigma sign com in @@ -742,4 +742,3 @@ let fconstruct_with_univ sigma sign com = let (_,j) = with_universes (Mach.fexecute sigma sign) (univ_sp, Constraintab.current_constraints(), c) in j -***) -- cgit v1.2.3