From 1609552d3ff34bd887755c163eb27eb98b72837f Mon Sep 17 00:00:00 2001
From: Alasdair
Date: Tue, 29 Sep 2020 16:45:03 +0100
Subject: Include comments in AST type

---
 src/initial_check.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/initial_check.ml')

diff --git a/src/initial_check.ml b/src/initial_check.ml
index a958dced..1b21e2be 100644
--- a/src/initial_check.ml
+++ b/src/initial_check.ml
@@ -847,7 +847,7 @@ let to_ast ctx (P.Defs files) =
         let defs', ctx = to_ast_defs ctx file in (defs @ wrap_file (fst file) defs', ctx)
       ) ([], ctx) files
   in
-  { defs = defs }, ctx
+  { defs = defs; comments = [] }, ctx
 
 let initial_ctx = {
     type_constructors =
-- 
cgit v1.2.3