summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHongbo Zhang <bobzhang1988 AT gmail.com>2012-11-01 17:45:30 +0000
committerHongbo Zhang <bobzhang1988 AT gmail.com>2012-11-01 17:45:30 +0000
commit7ee1f3e11e601ef584f46ba30e6a464ebe465feb (patch)
tree31f2ebf317c400712ef587e9b83b99f90b1c3c62
parent6ee61c4c2fdb8686ae09b0dcbaa0897bf4b428e5 (diff)
fix a typo in record printing
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13058 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
-rw-r--r--parsing/pprintast.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/pprintast.ml b/parsing/pprintast.ml
index 2e765a67a..8bcc1cca8 100644
--- a/parsing/pprintast.ml
+++ b/parsing/pprintast.ml
@@ -368,7 +368,7 @@ class printer ()= object(self:'self)
(match closed with
|Closed ->
pp f "@[<2>{@;%a@;}@]"
- (self#list longident_x_pattern ~sep:";@:") l
+ (self#list longident_x_pattern ~sep:";@;") l
| _ ->
pp f "@[<2>{@;%a;_}@]"
(self#list longident_x_pattern ~sep:";@;") l)