aboutsummaryrefslogtreecommitdiff
path: root/printing/ppconstr.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-08-29 14:41:36 +0200
committerMaxime Dénès2017-08-29 14:41:36 +0200
commit9326b0466cc04175436dc57cf0283c151b587e54 (patch)
treeefa25b429b80403105431c8ea21bae475dffea8e /printing/ppconstr.ml
parent57af4b4112dd0bc54badf0faebb373ef70ea2c1a (diff)
parent414a30432119bcc878793b33144f671403132f7a (diff)
Merge PR #916: Fixing notation bug 5608 involving { } and a slight restructuration
Diffstat (limited to 'printing/ppconstr.ml')
-rw-r--r--printing/ppconstr.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/printing/ppconstr.ml b/printing/ppconstr.ml
index ee03bc9007..4a103cdd23 100644
--- a/printing/ppconstr.ml
+++ b/printing/ppconstr.ml
@@ -15,6 +15,7 @@ open Nameops
open Libnames
open Pputils
open Ppextend
+open Notation_term
open Constrexpr
open Constrexpr_ops
open Decl_kinds
@@ -737,7 +738,7 @@ let tag_var = tag Tag.variable
pr_lconstr_pattern_expr : constr_pattern_expr -> Pp.t
}
- type precedence = Ppextend.precedence * Ppextend.parenRelation
+ type precedence = Notation_term.precedence * Notation_term.parenRelation
let modular_constr_pr = pr
let rec fix rf x = rf (fix rf) x
let pr = fix modular_constr_pr mt