From 7441db19749fb7fb9383b6361dfbd99547e53486 Mon Sep 17 00:00:00 2001 From: Alasdair Date: Tue, 29 Sep 2020 16:23:40 +0100 Subject: Refactor: Change AST type from a union to a struct --- src/interactive.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/interactive.ml') diff --git a/src/interactive.ml b/src/interactive.ml index d5d0fca4..20f16c6f 100644 --- a/src/interactive.ml +++ b/src/interactive.ml @@ -60,7 +60,7 @@ let opt_auto_interpreter_rewrites = ref false let env = ref Type_check.initial_env -let ast = ref (Defs []) +let ast = ref empty_ast let arg str = ("<" ^ str ^ ">") |> Util.yellow |> Util.clear -- cgit v1.2.3