diff options
| author | Björn-Egil Dahlberg <egil@erlang.org> | 2013-10-01 23:15:50 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <egil@erlang.org> | 2014-01-28 15:56:27 +0100 |
| commit | 652ddd4c360cd2cc381ed033915d87d967310a49 (patch) | |
| tree | b750543ba423f391628de4e2c93c4f4eee88a892 /lib/compiler/src/core_pp.erl | |
| parent | 758702e24f0780130c6b3058426062a3761b7a6e (diff) | |
| download | erlang-652ddd4c360cd2cc381ed033915d87d967310a49.tar.gz | |
Extend representation for maps in Core Erlang
Diffstat (limited to 'lib/compiler/src/core_pp.erl')
| -rw-r--r-- | lib/compiler/src/core_pp.erl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/compiler/src/core_pp.erl b/lib/compiler/src/core_pp.erl index c8c59b9246..f775d87507 100644 --- a/lib/compiler/src/core_pp.erl +++ b/lib/compiler/src/core_pp.erl @@ -172,7 +172,12 @@ format_1(#c_map{es=Es}, Ctxt) -> format_hseq(Es, ",", add_indent(Ctxt, 1), fun format/2), "}~" ]; -format_1(#c_map_pair{key=K,val=V}, Ctxt) -> +format_1(#c_map_pair_assoc{key=K,val=V}, Ctxt) -> + ["::<", + format_hseq([K,V], ",", add_indent(Ctxt, 1), fun format/2), + ">" + ]; +format_1(#c_map_pair_exact{key=K,val=V}, Ctxt) -> ["~<", format_hseq([K,V], ",", add_indent(Ctxt, 1), fun format/2), ">" |