aboutsummaryrefslogtreecommitdiff
path: root/plugins/syntax/string_notation.ml
diff options
context:
space:
mode:
authorPierre Roux2020-09-03 13:11:00 +0200
committerPierre Roux2020-11-04 20:14:47 +0100
commitdfcb15141a19db4f1cc61c14d1cdad0275009356 (patch)
tree397fe74273788ff980fe564fa2e812cd004ff847 /plugins/syntax/string_notation.ml
parent3f04bd0a74575d93b2a5c1dfff2bd5a364bfac59 (diff)
[numeral notation] Add a pre/postprocessing
This will enable to define numeral notation on non inductive by using an inductive type as proxy and those translations to translate to/from the actual type to the inductive type.
Diffstat (limited to 'plugins/syntax/string_notation.ml')
-rw-r--r--plugins/syntax/string_notation.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/plugins/syntax/string_notation.ml b/plugins/syntax/string_notation.ml
index e7ed0d8061..dbb0e92d5c 100644
--- a/plugins/syntax/string_notation.ml
+++ b/plugins/syntax/string_notation.ml
@@ -82,6 +82,7 @@ let vernac_string_notation local ty f g scope =
in
let o = { to_kind = to_kind;
to_ty = to_ty;
+ to_post = [||];
of_kind = of_kind;
of_ty = of_ty;
ty_name = ty;