diff options
| author | filliatr | 1999-08-18 09:26:03 +0000 |
|---|---|---|
| committer | filliatr | 1999-08-18 09:26:03 +0000 |
| commit | a9cab41ba380e1e5ab2c4d18880a73dbafbd914b (patch) | |
| tree | 2a3d95f84dd4d14c0332ce899ffdb97190f1a262 /kernel/closure.mli | |
| parent | 9eabd9dce9f6541099394f0492aeb669a1005ee9 (diff) | |
module Reduction (debut)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/closure.mli')
| -rw-r--r-- | kernel/closure.mli | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/closure.mli b/kernel/closure.mli index 3f36651911..52f2ad038c 100644 --- a/kernel/closure.mli +++ b/kernel/closure.mli @@ -97,8 +97,7 @@ val cbv_norm_value : 'a cbv_infos -> cbv_value -> constr -(* Lazy reduction - *) +(* Lazy reduction *) type 'a freeze type 'a frterm = | FRel of int @@ -161,6 +160,7 @@ type case_status = (* Constant cache *) type 'a clos_infos val create_clos_infos : flags -> 'a unsafe_env -> 'a clos_infos +val clos_infos_env : 'a clos_infos -> 'a unsafe_env (* Reduction function *) val norm_val : 'a clos_infos -> fconstr -> constr |