17 lines
No EOL
441 B
Text
17 lines
No EOL
441 B
Text
import Lean.Data.Lsp
|
|
open IO Lean Lsp
|
|
|
|
#eval (do
|
|
Ipc.runWith (←IO.appPath) #["--worker"] do
|
|
let hIn ← Ipc.stdin
|
|
hIn.write (←FS.readBinFile "init_vscode_1_47_2.log")
|
|
hIn.flush
|
|
|
|
hIn.write (←FS.readBinFile "open_empty.log")
|
|
hIn.flush
|
|
let diags ← Ipc.collectDiagnostics 1 "file:///empty"
|
|
assert! diags.length == 1
|
|
|
|
Ipc.writeNotification ⟨"exit", Json.null⟩
|
|
discard Ipc.waitForExit
|
|
: IO Unit) |