aboutsummaryrefslogtreecommitdiffstats
path: root/lib/hipe/cerl
diff options
context:
space:
mode:
authorBjörn-Egil Dahlberg <[email protected]>2014-01-15 17:59:26 +0100
committerBjörn-Egil Dahlberg <[email protected]>2014-01-29 11:08:48 +0100
commitf95c907a0fda5d185c895bfb43cd2a76e46b7e81 (patch)
tree81991b378a10853fbd34f14f8378e7c097821e01 /lib/hipe/cerl
parent1ebfc08a004c530faa592a09cf101036329b18fb (diff)
downloadotp-f95c907a0fda5d185c895bfb43cd2a76e46b7e81.tar.gz
otp-f95c907a0fda5d185c895bfb43cd2a76e46b7e81.tar.bz2
otp-f95c907a0fda5d185c895bfb43cd2a76e46b7e81.zip
hipe: Update cerl pretty printer
Diffstat (limited to 'lib/hipe/cerl')
-rw-r--r--lib/hipe/cerl/cerl_prettypr.erl6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/hipe/cerl/cerl_prettypr.erl b/lib/hipe/cerl/cerl_prettypr.erl
index 60926e16e1..ee5b41207b 100644
--- a/lib/hipe/cerl/cerl_prettypr.erl
+++ b/lib/hipe/cerl/cerl_prettypr.erl
@@ -64,7 +64,7 @@
try_body/1, try_vars/1, try_evars/1, try_handler/1,
tuple_es/1, type/1, values_es/1, var_name/1,
- map_es/1, map_pair_assoc_es/1, map_pair_exact_es/1
+ map_es/1, map_pair_es/1
]).
-define(PAPER, 76).
@@ -605,13 +605,13 @@ lay_map(Node, Ctxt) ->
floating(text("}~")))).
lay_map_pair_assoc(Node, Ctxt) ->
- [K,V] = map_pair_assoc_es(Node),
+ [K,V] = map_pair_es(Node),
beside(floating(text("::<")),
beside(lay(K,Ctxt),beside(floating(text(",")), beside(lay(V,Ctxt),
floating(text(">")))))).
lay_map_pair_exact(Node, Ctxt) ->
- [K,V] = map_pair_exact_es(Node),
+ [K,V] = map_pair_es(Node),
beside(floating(text("~<")),
beside(lay(K,Ctxt),beside(floating(text(",")), beside(lay(V,Ctxt),
floating(text(">")))))).