aboutsummaryrefslogtreecommitdiff
path: root/interp/notation.mli
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2020-07-17 17:00:44 +0200
committerEmilio Jesus Gallego Arias2020-07-17 17:00:44 +0200
commitf67c3829f7239bd417499b2450c4afe6e825dbd7 (patch)
tree9ea9e6f636ed8103717a471add03d065cce5273c /interp/notation.mli
parente04e12c60fe90735c22542bfd6b0b94f4b4cbc1e (diff)
parent5b277eb47f9becf09a1f2523434b2db379e39494 (diff)
Merge PR #12683: Fixes #12682: printing bug with recursive notations for n-ary applications used with applied references
Reviewed-by: ejgallego
Diffstat (limited to 'interp/notation.mli')
-rw-r--r--interp/notation.mli7
1 files changed, 6 insertions, 1 deletions
diff --git a/interp/notation.mli b/interp/notation.mli
index c39bfa6e28..05ddd25a62 100644
--- a/interp/notation.mli
+++ b/interp/notation.mli
@@ -239,7 +239,12 @@ val declare_uninterpretation : interp_rule -> interpretation -> unit
val interp_notation : ?loc:Loc.t -> notation -> subscopes ->
interpretation * (notation_location * scope_name option)
-type notation_rule = interp_rule * interpretation * int option
+type notation_applicative_status =
+ | AppBoundedNotation of int
+ | AppUnboundedNotation
+ | NotAppNotation
+
+type notation_rule = interp_rule * interpretation * notation_applicative_status
(** Return the possible notations for a given term *)
val uninterp_notations : 'a glob_constr_g -> notation_rule list