From 96f45d426ae130a7b2f71dd7691764d23445fd56 Mon Sep 17 00:00:00 2001 From: Louis-Philippe Gauthier <lpgauth@gmail.com> Date: Tue, 14 Oct 2014 16:54:45 -0400 Subject: [PATCH] Basic support for maps --- src/edown_layout.erl | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/edown_layout.erl b/src/edown_layout.erl index 0bad2ab..b8c0422 100644 --- a/src/edown_layout.erl +++ b/src/edown_layout.erl @@ -898,6 +898,8 @@ t_type([#xmlElement{name = 'fun', content = Es}]) -> ["fun("] ++ t_fun(Es) ++ [")"]; t_type([E = #xmlElement{name = record, content = Es}]) -> t_record(E, Es); +t_type([#xmlElement{name = map}]) -> + t_map(); t_type([E = #xmlElement{name = abstype, content = Es}]) -> t_abstype(E, Es); t_type([#xmlElement{name = union, content = Es}]) -> @@ -949,6 +951,9 @@ t_record(E, Es) -> see(E, Name) ++ ["{"] ++ seq(fun t_field/1, Fs, ["}"]) end. +t_map() -> + ["#{}"]. + t_field(#xmlElement{content = Es}) -> t_type(get_elem(atom, Es)) ++ [" = "] ++ t_utype(get_elem(type, Es)). -- GitLab