From c65aecd008d34102f4c95649113ed7f9afcc903b Mon Sep 17 00:00:00 2001
From: Alasdair
Date: Wed, 12 Dec 2018 00:49:32 +0000
Subject: Fix various boolean type-variable related issues

Remove some dead code in Pretty_print_common

Start thinking a bit about Minisail-esque syntactic sugar in initial_check
---
 src/parse_ast.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/parse_ast.ml')

diff --git a/src/parse_ast.ml b/src/parse_ast.ml
index c57daa26..a5dbf66e 100644
--- a/src/parse_ast.ml
+++ b/src/parse_ast.ml
@@ -164,6 +164,7 @@ atyp_aux =  (* expressions of all kinds, to be translated to types, nats, orders
  | ATyp_tup of (atyp) list (* Tuple type *)
  | ATyp_app of id * (atyp) list (* type constructor application *)
  | ATyp_exist of kid list * atyp * atyp
+ | ATyp_base of id * atyp * atyp
 
 and atyp = 
    ATyp_aux of atyp_aux * l
-- 
cgit v1.2.3