aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/funind/recdef.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2013-12-24 18:18:10 +0100
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2013-12-24 18:23:41 +0100
commit18c7a10341b462256b576542412db889d528465f (patch)
tree3ccbccb2c94be46369fa5ebbdec11ba632c7e9fb /plugins/funind/recdef.ml
parent7a7dd14e763d13887101834fc2288046740cb8a2 (diff)
Qed: feedback when type checking is done
To make this possible the state id has to reach the kernel. Hence definition_entry has an extra field, and many files had to be fixed.
Diffstat (limited to 'plugins/funind/recdef.ml')
-rw-r--r--plugins/funind/recdef.ml4
1 files changed, 3 insertions, 1 deletions
diff --git a/plugins/funind/recdef.ml b/plugins/funind/recdef.ml
index 082d7ad51..26e1011ba 100644
--- a/plugins/funind/recdef.ml
+++ b/plugins/funind/recdef.ml
@@ -61,7 +61,9 @@ let (declare_fun : Id.t -> logical_kind -> constr -> global_reference) =
const_entry_secctx = None;
const_entry_type = None;
const_entry_opaque = false;
- const_entry_inline_code = false} in
+ const_entry_inline_code = false;
+ const_entry_feedback = None;
+ } in
ConstRef(declare_constant f_id (DefinitionEntry ce, kind));;
let defined () = Lemmas.save_proof (Vernacexpr.Proved (false,None))