From deadb6055aeca7a2ed944deabb96a5d9ebdbd114 Mon Sep 17 00:00:00 2001
From: barras
Date: Wed, 17 Nov 2004 15:10:26 +0000
Subject: bug module M:=N avec vm

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

(limited to 'kernel/cbytegen.ml')

diff --git a/kernel/cbytegen.ml b/kernel/cbytegen.ml
index 022f913ba0..108dadbb78 100644
--- a/kernel/cbytegen.ml
+++ b/kernel/cbytegen.ml
@@ -471,7 +471,7 @@ let compile env c =
   init_code,!fun_code, Array.of_list fv
 
 
-let compile_constant_body env kn body opaque boxed =
+let compile_constant_body env body opaque boxed =
   if opaque then BCconstant
   else match body with
   | None -> BCconstant
-- 
cgit v1.2.3