summaryrefslogtreecommitdiff
path: root/frontend/ast_printer.ml
diff options
context:
space:
mode:
Diffstat (limited to 'frontend/ast_printer.ml')
-rw-r--r--frontend/ast_printer.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/ast_printer.ml b/frontend/ast_printer.ml
index c14d0d1..3ac881e 100644
--- a/frontend/ast_printer.ml
+++ b/frontend/ast_printer.ml
@@ -72,7 +72,7 @@ let print_list f sep fmt l =
let rec aux = function
| [] -> ()
| [a] -> f fmt a
- | a::b -> f fmt a; Format.pp_print_string fmt sep; aux b
+ | a::b -> f fmt a; Format.fprintf fmt "%s@," sep; aux b
in
aux l