diff options
| author |  Enrico Tassi <Enrico.Tassi@inria.fr> | 2013-12-24 18:18:10 +0100 |
|---|---|---|
| committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2013-12-24 18:23:41 +0100 |
| commit | 18c7a10341b462256b576542412db889d528465f (patch) | |
| tree | 3ccbccb2c94be46369fa5ebbdec11ba632c7e9fb /library/declare.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 'library/declare.ml')
| -rw-r--r-- | library/declare.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/library/declare.ml b/library/declare.ml index a0d0cc2ec..3bd4cdd3f 100644 --- a/library/declare.ml +++ b/library/declare.ml @@ -209,6 +209,7 @@ let declare_sideff se = const_entry_type = ty; const_entry_opaque = opaque; const_entry_inline_code = false; + const_entry_feedback = None; }); cst_hyps = [] ; cst_kind = Decl_kinds.IsDefinition Decl_kinds.Definition; @@ -254,7 +255,8 @@ let declare_definition ?(internal=UserVerbose) const_entry_type = types; const_entry_opaque = opaque; const_entry_inline_code = false; - const_entry_secctx = None } + const_entry_secctx = None; + const_entry_feedback = None } in declare_constant ~internal ~local id (Entries.DefinitionEntry cb, Decl_kinds.IsDefinition kind) |