fix a typo in record printing

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13058 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
2012-11-01 17:45:30 +00:00 · 2012-11-01 17:45:30 +00:00 · 7ee1f3e11e
parent 6ee61c4c2f
commit 7ee1f3e11e
1 changed files with 1 additions and 1 deletions
--- 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)