Fix exterior formatter.

This commit is contained in:
Graydon Hoare 2010-06-30 00:52:52 -07:00
parent 7d076bcaa0
commit 2a1d88ae00

View File

@ -1169,7 +1169,7 @@ and fmt_stmt_body (ff:Format.formatter) (s:stmt) : unit =
| STMT_init_exterior (lv, at) -> | STMT_init_exterior (lv, at) ->
fmt_lval ff lv; fmt_lval ff lv;
fmt ff " = @"; fmt ff " = @@";
fmt_atom ff at; fmt_atom ff at;
fmt ff ";" fmt ff ";"