From b07c57c159eafd2ca522f596460f96c999244dbb Mon Sep 17 00:00:00 2001
From: Christian Rinderknecht <Christian.Rinderknecht@tezcore.com>
Date: Wed, 24 Jun 2020 11:19:56 +0200
Subject: [PATCH] Fixed variable.

---
 src/passes/01-parser/pascaligo/Pretty.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/passes/01-parser/pascaligo/Pretty.ml b/src/passes/01-parser/pascaligo/Pretty.ml
index 9718d6d12..3ddce9746 100644
--- a/src/passes/01-parser/pascaligo/Pretty.ml
+++ b/src/passes/01-parser/pascaligo/Pretty.ml
@@ -215,7 +215,7 @@ and pp_var_decl {value; _} =
   let {name; var_type; init; _} = value in
   let start = string ("var " ^ name.value) in
   let start =
-    match const_type with
+    match var_type with
       None -> start
     | Some (_, e) ->
         group (start ^/^ nest 2 (string ": " ^^ pp_type_expr e)) in