aboutsummaryrefslogtreecommitdiff
path: root/interp/notation.mli
diff options
context:
space:
mode:
authorMaxime Dénès2016-06-16 13:29:59 +0200
committerMaxime Dénès2016-06-16 13:29:59 +0200
commitdac047eacc4038beb2f05c7458970051f689f20e (patch)
tree06ca0a8e503e5af7f86bce933dba4300b3df2989 /interp/notation.mli
parenta8c6eeeaa321a84063e8492aca25942a07c00ddb (diff)
parentd7737ba9b3a811b8415ce87d8e3e091c9e49d32e (diff)
Merge remote-tracking branch 'github/pr/194' into trunk
Diffstat (limited to 'interp/notation.mli')
-rw-r--r--interp/notation.mli5
1 files changed, 3 insertions, 2 deletions
diff --git a/interp/notation.mli b/interp/notation.mli
index 480979ccc3..a85dc50f2f 100644
--- a/interp/notation.mli
+++ b/interp/notation.mli
@@ -196,10 +196,11 @@ val pr_visibility: (glob_constr -> std_ppcmds) -> scope_name option -> std_ppcmd
(** Declare and look for the printing rule for symbolic notations *)
type unparsing_rule = unparsing list * precedence
type extra_unparsing_rules = (string * string) list
-val declare_notation_printing_rule :
- notation -> extra:extra_unparsing_rules -> unparsing_rule -> unit
+val declare_notation_rule :
+ notation -> extra:extra_unparsing_rules -> unparsing_rule -> notation_grammar -> unit
val find_notation_printing_rule : notation -> unparsing_rule
val find_notation_extra_printing_rules : notation -> extra_unparsing_rules
+val find_notation_parsing_rules : notation -> notation_grammar
val add_notation_extra_printing_rule : notation -> string -> string -> unit
(** Rem: printing rules for primitive token are canonical *)