From aadbe7ede88dc9bbbda6a09876baacd6797153fb Mon Sep 17 00:00:00 2001
From: Alasdair Armstrong
Date: Wed, 6 Feb 2019 19:44:22 +0000
Subject: Improve emacs mode

Can now use C-c C-s to start an interactive Sail process, C-c C-l to
load a file, and C-c C-q to kill the sail process. Type errors are
highlighted in the emacs buffer (like with merlin for OCaml) with a
tooltip for the type-error, as well as being displayed in the
minibuffer. Need to add a C-c C-x command like merlin to jump to the
error, and figure out how to handle multiple files nicely, as well as
hooking the save function like tuareg/merlin, but this is already
enough to make working with small examples quite a bit more pleasant.
---
 src/process_file.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'src/process_file.ml')

diff --git a/src/process_file.ml b/src/process_file.ml
index 00013775..98dc725d 100644
--- a/src/process_file.ml
+++ b/src/process_file.ml
@@ -92,6 +92,8 @@ module StringSet = Set.Make(String)
 
 let symbols = ref StringSet.empty
 
+let clear_symbols () = symbols := StringSet.empty
+
 let cond_pragma l defs =
   let depth = ref 0 in
   let in_then = ref true in
-- 
cgit v1.2.3