From 2c6002d1fbf08ee68914227e3a4267cb38ff8b81 Mon Sep 17 00:00:00 2001
From: filliatr
Date: Fri, 10 Sep 1999 14:00:56 +0000
Subject: modules System, Lib et States

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@71 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 kernel/typing.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'kernel/typing.ml')

diff --git a/kernel/typing.ml b/kernel/typing.ml
index f3928b2fdc..7cd127cf60 100644
--- a/kernel/typing.ml
+++ b/kernel/typing.ml
@@ -159,7 +159,8 @@ and execute_array mf env v =
   (Array.of_list jl, u1)
 
 and execute_list mf env = function
-  | [] -> ([], universes env)
+  | [] -> 
+      ([], universes env)
   | c::r -> 
       let (j,u') = execute mf env c in 
       let (jr,u'') = execute_list mf (set_universes u' env) r in
-- 
cgit v1.2.3