aboutsummaryrefslogtreecommitdiff
path: root/parsing/ppextend.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2020-02-21 16:27:00 -0500
committerEmilio Jesus Gallego Arias2020-02-21 16:27:00 -0500
commit7ef010c50c9d8efcd20d44807126efcd418c4e0d (patch)
tree3ea883b38fdc81c0b6d29a5a0cc44cd233e0b032 /parsing/ppextend.ml
parent6aa5057f98c0196a5897ca82699125a5a16bf22b (diff)
parentd69d5ec6116ca36dba623c474273f30744ce2c48 (diff)
Merge PR #11590: Fixes #9741: only printing notations do not uselessly reserve parsing keywords
Reviewed-by: ejgallego
Diffstat (limited to 'parsing/ppextend.ml')
-rw-r--r--parsing/ppextend.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/parsing/ppextend.ml b/parsing/ppextend.ml
index 92f44faec8..0277e79adb 100644
--- a/parsing/ppextend.ml
+++ b/parsing/ppextend.ml
@@ -59,7 +59,8 @@ let rec unparsing_eq unp1 unp2 = match (unp1,unp2) with
| (UnpMetaVar _ | UnpBinderMetaVar _ | UnpListMetaVar _ |
UnpBinderListMetaVar _ | UnpTerminal _ | UnpBox _ | UnpCut _), _ -> false
-(* Concrete syntax for symbolic-extension table *)
+(* Register generic and specific printing rules *)
+
let generic_notation_printing_rules =
Summary.ref ~name:"generic-notation-printing-rules" (NotationMap.empty : (unparsing_rule * bool * extra_unparsing_rules) NotationMap.t)