wip rejiggering

bin/Diagnose.re

@@ -0,0 +1,8 @@
+Printexc.record_backtrace(true);
+
+switch (Sys.argv) {
+  | [|_, merlinFile|] =>
+    let modules = Util.MerlinFile.getModulesFromMerlin(Filename.dirname(merlinFile), Util.Files.readFileExn(merlinFile))
+    print_endline("Ok")
+  | _ => failwith("bad args")
+}

bin/dune

@@ -3,7 +3,15 @@
   (name Bin)
   (public_name Bin)
   (libraries Lsp)
+  (modules Bin)
   (flags :standard -w -9)
   (preprocess (pps Belt_ppx Ppx_monads))
   )
 
+(executable
+  (public_name diagnose)
+  (modules Diagnose)
+  (libraries Lsp Analyze)
+  (flags :standard -w -9)
+  (preprocess (pps Belt_ppx Ppx_monads))
+)

dune

@@ -1,4 +1,8 @@
 (ignored_subdirs (
   examples
   node_modules
-))
+))
+
+(env
+    (dev
+      (flags (:standard -warn-error -A))))

examples/dune-complex/both/A.re

@@ -0,0 +1 @@
+let x = 1

examples/dune-complex/both/B.re

@@ -0,0 +1 @@
+let x = 1

examples/dune-complex/both/dune

@@ -0,0 +1,2 @@
+(executable (name A) (libraries B))
+(library (name B))

examples/dune-complex/dune-project

@@ -0,0 +1,2 @@
+(lang dune 1.8)
+(name dune-complex)

examples/dune-complex/esy.json

@@ -0,0 +1,12 @@
+{
+  "name": "dune-complex",
+  "esy": {
+    "build": "dune build -p #{self.name}",
+    "buildsInSource": "_build"
+  },
+  "dependencies": {
+    "@opam/dune": "*",
+    "rex-json": "jaredly/rex-json#esy",
+    "@esy-ocaml/reason": "*"
+  }
+}

examples/dune-complex/esy.lock/.gitattributes

@@ -0,0 +1,3 @@
+
+# Set eol to LF so files aren't converted to CRLF-eol on Windows.
+* text eol=lf

examples/dune-complex/esy.lock/.gitignore

@@ -0,0 +1,3 @@
+
+# Reset any possible .gitignore, we want all esy.lock to be un-ignored.
+!*