aboutsummaryrefslogtreecommitdiff
path: root/kernel/constant.ml
diff options
context:
space:
mode:
authorfilliatr1999-08-27 16:58:43 +0000
committerfilliatr1999-08-27 16:58:43 +0000
commitb69aafe250ca1fbb21eb2f318873fe65856511c0 (patch)
tree0a44fc61206e9abe1d6863ac7dd8e282808cd6c1 /kernel/constant.ml
parentdd279791aca531cd0f38ce79b675c68e08a4ff63 (diff)
suppression champs inutiles dans constantes et inductifs; verification definitions inductives
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@29 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/constant.ml')
-rw-r--r--kernel/constant.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/kernel/constant.ml b/kernel/constant.ml
index 766fbb7354..9699d68a75 100644
--- a/kernel/constant.ml
+++ b/kernel/constant.ml
@@ -25,9 +25,7 @@ type constant_body = {
const_body : recipe ref option;
const_type : typed_type;
const_hyps : typed_type signature;
- mutable const_opaque : bool;
- mutable const_eval : ((int * constr) list * int * bool) option option;
-}
+ mutable const_opaque : bool }
let is_defined cb =
match cb.const_body with Some _ -> true | _ -> false