Catch ast pretty-printer up with init-tup syntax.

This commit is contained in:
Graydon Hoare 2010-07-01 19:27:20 -07:00
parent bb018b24f5
commit 6c9832d3ec
1 changed files with 1 additions and 1 deletions

View File

@ -1045,7 +1045,7 @@ and fmt_stmt_body (ff:Format.formatter) (s:stmt) : unit =
| STMT_init_tup (dst, entries) ->
fmt_lval ff dst;
fmt ff " = (";
fmt ff " = tup(";
for i = 0 to (Array.length entries) - 1
do
if i != 0