Permalink
Browse files

[fix] qmlPrint: printing more line breaks when printing long directives

  • Loading branch information...
1 parent 24f427d commit 8ba765623169505014e5cb7dc54569c6a403e1c4 Valentin Gatien-Baron committed Jul 6, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 libqmlcompil/qmlPrint.ml
@@ -481,9 +481,9 @@ object (self)
match exprs, tys with
| [], [] -> pp f "@[<2>%a@]" variant_aux variant
| _, [] ->
- pp f "@[<2>%a(%a)@]" variant_aux variant (pp_list ",@ " self#reset#under_comma#expr) exprs
+ pp f "@[<2>%a(@,%a)@]" variant_aux variant (pp_list ",@ " self#reset#under_comma#expr) exprs
| _ ->
- pp f "@[<2>%a(%a ; %a)@]" variant_aux variant
+ pp f "@[<2>%a(@,%a ;@ %a)@]" variant_aux variant
(pp_list ",@ " self#reset#under_comma#expr) exprs
(pp_list ",@ " self#reset#under_comma#ty) tys
method record f l =

0 comments on commit 8ba7656

Please sign in to comment.