Missing case in fcode pretty printer

This commit is contained in:
Ulf Norell 2019-05-06 14:19:41 +02:00
parent 110466b08c
commit 16f00701d7

View File

@ -1236,6 +1236,8 @@ pp_ftype({list, T}) ->
pp_beside([pp_text("list("), pp_ftype(T), pp_text(")")]);
pp_ftype({function, Args, 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_par(
pp_punctuate(pp_text(" |"),