Missing case in fcode pretty printer
This commit is contained in:
parent
110466b08c
commit
16f00701d7
@ -1236,6 +1236,8 @@ pp_ftype({list, T}) ->
|
|||||||
pp_beside([pp_text("list("), pp_ftype(T), pp_text(")")]);
|
pp_beside([pp_text("list("), pp_ftype(T), pp_text(")")]);
|
||||||
pp_ftype({function, Args, Res}) ->
|
pp_ftype({function, Args, Res}) ->
|
||||||
pp_par([pp_ftype({tuple, Args}), pp_text("=>"), pp_ftype(Res)]);
|
pp_par([pp_ftype({tuple, Args}), pp_text("=>"), pp_ftype(Res)]);
|
||||||
|
pp_ftype({map, Key, Val}) ->
|
||||||
|
pp_beside([pp_text("map"), pp_ftype({tuple, [Key, Val]})]);
|
||||||
pp_ftype({variant, Cons}) ->
|
pp_ftype({variant, Cons}) ->
|
||||||
pp_par(
|
pp_par(
|
||||||
pp_punctuate(pp_text(" |"),
|
pp_punctuate(pp_text(" |"),
|
||||||
|
Loading…
x
Reference in New Issue
Block a user