diff options
author | 2013-12-24 18:18:10 +0100 | |
---|---|---|
committer | 2013-12-24 18:23:41 +0100 | |
commit | 18c7a10341b462256b576542412db889d528465f (patch) | |
tree | 3ccbccb2c94be46369fa5ebbdec11ba632c7e9fb /plugins/funind/recdef.ml | |
parent | 7a7dd14e763d13887101834fc2288046740cb8a2 (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.ml | 4 |
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)) |