aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/src/v3_kernel_pp.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2011-02-02 10:20:20 +0100
committerBjörn Gustavsson <[email protected]>2011-02-02 10:20:20 +0100
commit99f7b4e9acba5525f5390526bbb4baf17625c43b (patch)
tree77d947c121941a932d40caf8d4605ceafec24f2a /lib/compiler/src/v3_kernel_pp.erl
parent8749970bd0163623cddebf46fa6438f75042d40b (diff)
downloadotp-99f7b4e9acba5525f5390526bbb4baf17625c43b.tar.gz
otp-99f7b4e9acba5525f5390526bbb4baf17625c43b.tar.bz2
otp-99f7b4e9acba5525f5390526bbb4baf17625c43b.zip
v3_kernel_pp: Add support for pretty-printing #k_literal{} records
Diffstat (limited to 'lib/compiler/src/v3_kernel_pp.erl')
-rw-r--r--lib/compiler/src/v3_kernel_pp.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/compiler/src/v3_kernel_pp.erl b/lib/compiler/src/v3_kernel_pp.erl
index 18cb3edc20..9bd13f7032 100644
--- a/lib/compiler/src/v3_kernel_pp.erl
+++ b/lib/compiler/src/v3_kernel_pp.erl
@@ -113,6 +113,8 @@ format_1(#k_bin_int{size=Sz,unit=U,flags=Fs,val=Val,next=Next}, Ctxt) ->
[format_bin_seg_1(S, Ctxt),
format_bin_seg(Next, ctxt_bump_indent(Ctxt, 2))];
format_1(#k_bin_end{}, _Ctxt) -> "#<>#";
+format_1(#k_literal{val=Term}, _Ctxt) ->
+ io_lib:format("~p", [Term]);
format_1(#k_local{name=N,arity=A}, Ctxt) ->
"local " ++ format_fa_pair({N,A}, Ctxt);
format_1(#k_remote{mod=M,name=N,arity=A}, _Ctxt) ->