From f987a343850df4602b3d8020395834d22eb1aea3 Mon Sep 17 00:00:00 2001 From: gregoire Date: Fri, 12 Nov 2004 16:40:39 +0000 Subject: Changement dans les boxed values . git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6295 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/vm.mli | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'kernel/vm.mli') diff --git a/kernel/vm.mli b/kernel/vm.mli index d6e7f6eee..a4651cf7d 100644 --- a/kernel/vm.mli +++ b/kernel/vm.mli @@ -3,10 +3,11 @@ open Term open Cbytecodes open Cemitcodes -(* option for virtual machine *) + +val set_drawinstr : unit -> unit + val transp_values : unit -> bool val set_transp_values : bool -> unit -val swap_global_transp : unit -> unit (* le code machine *) type tcode @@ -60,7 +61,7 @@ val val_of_named : identifier -> values val val_of_named_def : identifier -> values -> values val val_of_constant : constant -> values -val val_of_constant_def : constant -> values -> values +val val_of_constant_def : int -> constant -> values -> values (* Destructors *) val whd_val : values -> whd -- cgit v1.2.3