aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/util.ml
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-11-22 14:14:12 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2008-11-22 14:14:12 +0000
commit2f69234e4cf2a1484aa43dd4d033957abb9078d5 (patch)
treedcbd78704dca5cc2749affc777097667be99c8fa /lib/util.ml
parent5923919582bbfa207d5141d5059bd3916e501843 (diff)
Fixed bug in VernacExtend printing + missing vernacular printing rules +
revival of option -translate as a -beautify option. PS: compilation checked against 11610. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11618 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/util.ml')
-rw-r--r--lib/util.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/util.ml b/lib/util.ml
index 46969ec83..639d2bf00 100644
--- a/lib/util.ml
+++ b/lib/util.ml
@@ -1321,7 +1321,7 @@ let prvect_with_sep sep elem v =
let prvect elem v = prvect_with_sep mt elem v
let pr_located pr (loc,x) =
- if Flags.do_translate() && loc<>dummy_loc then
+ if Flags.do_beautify() && loc<>dummy_loc then
let (b,e) = unloc loc in
comment b ++ pr x ++ comment e
else pr x