aboutsummaryrefslogtreecommitdiff
path: root/printing/ppconstr.ml
diff options
context:
space:
mode:
Diffstat (limited to 'printing/ppconstr.ml')
-rw-r--r--printing/ppconstr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppconstr.ml b/printing/ppconstr.ml
index 65b4e238de..ed54e046fd 100644
--- a/printing/ppconstr.ml
+++ b/printing/ppconstr.ml
@@ -85,7 +85,7 @@ let tag_var = tag Tag.variable
let env = ref terms and envlist = ref termlists and bl = ref binders and bll = ref binderlists in
let pop r = let a = List.hd !r in r := List.tl !r; a in
let return unp pp1 pp2 = (tag_unparsing unp pp1) ++ pp2 in
- let parens = !Constrextern.print_coercions in
+ let parens = !Constrextern.print_parens in
(* Warning:
The following function enforces a very precise order of
evaluation of sub-components.