Commit 73107c3f authored by POTTIER Francois's avatar POTTIER Francois

Print {} instead of {()}.

parent 1a89c018
......@@ -134,10 +134,10 @@ let print_branch mode f branch =
(Misc.o2s branch.branch_prec_annotation (fun x -> " %prec "^x.value));
begin match mode with
| PrintNormal ->
Action.print f branch.action
Action.print f branch.action
| PrintUnitActions
| PrintUnitActionsUnitTokens ->
Printf.fprintf f "()"
() (* Printing a pair of empty braces is fine. *)
end;
Printf.fprintf f "}\n"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment