diff options
| -rw-r--r-- | parsing/pprintast.ml | 2 |
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) |