From 16f00701d7a0c4f0cdb1a6c2206fc2f1169b3401 Mon Sep 17 00:00:00 2001
From: Ulf Norell <ulf.norell@gmail.com>
Date: Mon, 6 May 2019 14:19:41 +0200
Subject: [PATCH] Missing case in fcode pretty printer

---
 src/aeso_ast_to_fcode.erl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/aeso_ast_to_fcode.erl b/src/aeso_ast_to_fcode.erl
index 64cf8f2..9f2b2ea 100644
--- a/src/aeso_ast_to_fcode.erl
+++ b/src/aeso_ast_to_fcode.erl
@@ -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(" |"),