File 0945-Replace-several-par-with-sep.patch of Package erlang
From bbc9e422c561a8938a62c82699e2f4facc17eadb Mon Sep 17 00:00:00 2001
From: Pierre Krafft <kpierre@outlook.com>
Date: Thu, 7 Nov 2019 02:03:11 +0100
Subject: [PATCH 2/5] Replace several par with sep
par often makes for code that is more compact but less readable.
Similar tools opt for readability and we should too!
---
lib/syntax_tools/src/erl_prettypr.erl | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/lib/syntax_tools/src/erl_prettypr.erl b/lib/syntax_tools/src/erl_prettypr.erl
index 2a059a9d79..9fcc49c7dd 100644
--- a/lib/syntax_tools/src/erl_prettypr.erl
+++ b/lib/syntax_tools/src/erl_prettypr.erl
@@ -474,13 +474,13 @@ lay_2(Node, Ctxt) ->
floating(text(",")), reset_prec(Ctxt),
fun lay/2),
beside(floating(text("{")),
- beside(par(Es),
+ beside(sep(Es),
floating(text("}"))));
list ->
Ctxt1 = reset_prec(Ctxt),
Node1 = erl_syntax:compact_list(Node),
- D1 = par(seq(erl_syntax:list_prefix(Node1),
+ D1 = sep(seq(erl_syntax:list_prefix(Node1),
floating(text(",")), Ctxt1,
fun lay/2)),
D = case erl_syntax:list_suffix(Node1) of
@@ -547,7 +547,7 @@ lay_2(Node, Ctxt) ->
floating(text(",")), reset_prec(Ctxt),
fun lay/2),
D1 = beside(D, beside(text("("),
- beside(par(As),
+ beside(sep(As),
floating(text(")"))))),
maybe_parentheses(D1, Prec, Ctxt);
@@ -724,7 +724,7 @@ lay_2(Node, Ctxt) ->
_ when Args =:= none ->
lay(N, Ctxt1);
_ ->
- D1 = par(seq(Args, floating(text(",")), Ctxt1,
+ D1 = sep(seq(Args, text(","), Ctxt1,
fun lay/2)),
beside(lay(N, Ctxt1),
beside(text("("),
@@ -1203,12 +1203,12 @@ lay_2(Node, Ctxt) ->
floating(text(",")), reset_prec(Ctxt),
fun lay/2),
beside(floating(text("{")),
- beside(par(Es), floating(text("}"))))
+ beside(sep(Es), floating(text("}"))))
end;
type_union ->
{_, Prec, PrecR} = type_inop_prec('|'),
- Es = par(seq(erl_syntax:type_union_types(Node),
+ Es = sep(seq(erl_syntax:type_union_types(Node),
floating(text(" |")), set_prec(Ctxt, PrecR),
fun lay/2)),
maybe_parentheses(Es, Prec, Ctxt);
--
2.16.4