From f95c907a0fda5d185c895bfb43cd2a76e46b7e81 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= Date: Wed, 15 Jan 2014 17:59:26 +0100 Subject: hipe: Update cerl pretty printer --- lib/hipe/cerl/cerl_prettypr.erl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lib/hipe') 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(">")))))). -- cgit v1.2.3