From 4c29750c3cc9c096b1d56736cfc99a0ab3c007d0 Mon Sep 17 00:00:00 2001
From: Gaith Hallak <gaithhallak@gmail.com>
Date: Fri, 26 May 2023 13:54:03 +0300
Subject: [PATCH] Fix pp_fpat

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

diff --git a/src/aeso_ast_to_fcode.erl b/src/aeso_ast_to_fcode.erl
index b5f2694..8cb7c84 100644
--- a/src/aeso_ast_to_fcode.erl
+++ b/src/aeso_ast_to_fcode.erl
@@ -2427,7 +2427,8 @@ pp_pat({con, As, I, Xs})       -> pp_fexpr({con, [], As, I, [{var, [], X} || X <
 pp_pat({var, X})               -> pp_fexpr({var, [], X});
 pp_pat(P = {Tag, _}) when Tag == bool; Tag == int; Tag == string
                                -> pp_fexpr({lit, [], P});
-pp_pat(Pat)                    -> pp_fexpr(Pat).
+pp_pat(nil)                    -> pp_fexpr({nil, []});
+pp_pat({assign, X, Y})         -> pp_beside([pp_text(X), pp_text(" = "), pp_text(Y)]).
 
 -spec is_infix(op()) -> boolean().
 is_infix(Op) ->