aboutsummaryrefslogtreecommitdiff
path: root/doc/plugin_tutorial/tuto1/src/simple_declare.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2020-05-15 02:42:38 +0200
committerEmilio Jesus Gallego Arias2020-06-26 14:38:10 +0200
commit1f121ebf2990dc25899f2f3eb138eddd147483cf (patch)
tree4986eb05a43c4912f0b85fae555c48c09fedee89 /doc/plugin_tutorial/tuto1/src/simple_declare.ml
parent671004aac9f9d3b70ef41f81e7b3ea8f190971ec (diff)
[declare] Refactor constant information into a record.
This improves the interface, and allows even more sealing of the API. This is yet work in progress.
Diffstat (limited to 'doc/plugin_tutorial/tuto1/src/simple_declare.ml')
-rw-r--r--doc/plugin_tutorial/tuto1/src/simple_declare.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/doc/plugin_tutorial/tuto1/src/simple_declare.ml b/doc/plugin_tutorial/tuto1/src/simple_declare.ml
index e9e866c5fb..5431a21b53 100644
--- a/doc/plugin_tutorial/tuto1/src/simple_declare.ml
+++ b/doc/plugin_tutorial/tuto1/src/simple_declare.ml
@@ -2,5 +2,5 @@ let declare_definition ~poly name sigma body =
let udecl = UState.default_univ_decl in
let scope = Declare.Global Declare.ImportDefaultBehavior in
let kind = Decls.(IsDefinition Definition) in
- Declare.declare_definition ~name ~scope ~kind ~impargs:[] ~udecl
- ~opaque:false ~poly ~types:None ~body sigma
+ let info = Declare.CInfo.make ~scope ~kind ~impargs:[] ~udecl ~opaque:false ~poly () in
+ Declare.declare_definition ~name ~info ~types:None ~body sigma