mirror of
https://github.com/Smaug123/nix-dotfiles
synced 2025-10-06 06:58:41 +00:00
257 lines
7.6 KiB
Lua
257 lines
7.6 KiB
Lua
vim.g["fsharp#fsautocomplete_command"] = { "fsautocomplete" }
|
|
vim.g["fsharp#show_signature_on_cursor_move"] = 1
|
|
vim.g["fsharp#fsi_keymap"] = "none"
|
|
|
|
-- MASSIVE HACK - raised https://github.com/ionide/Ionide-vim/pull/78
|
|
local function captureLoadedProjects()
|
|
vim.fn.execute("redir => g:massive_hack_patrick_capture")
|
|
vim.fn.execute("call fsharp#showLoadedProjects()")
|
|
vim.fn.execute("redir END")
|
|
local output = vim.fn.eval("g:massive_hack_patrick_capture")
|
|
|
|
local projects = {}
|
|
|
|
for line in output:gmatch("[^\r\n]+") do
|
|
local project = line:gsub("^%s*-%s*", "")
|
|
table.insert(projects, project)
|
|
end
|
|
|
|
return projects
|
|
end
|
|
|
|
-- Supply nil to get all loaded F# projects and build them.
|
|
local function BuildFSharpProjects(projects)
|
|
local function on_line(data, _, context)
|
|
-- Keep the window alive if there were warnings
|
|
if string.match(data, "%s[1-9]%d* Warning%(s%)") then
|
|
context.warn = context.warn + 1
|
|
end
|
|
end
|
|
|
|
local on_complete
|
|
local function spawn_next(context)
|
|
BuildUtils.run(
|
|
"dotnet",
|
|
{ "build", context.projects[context.completed + 1] },
|
|
"dotnet build",
|
|
context,
|
|
on_line,
|
|
on_complete
|
|
)
|
|
end
|
|
|
|
on_complete = function(context, code, signal)
|
|
print("Build process exited with code " .. code .. " and signal " .. signal)
|
|
if code ~= 0 then
|
|
context.errs = context.errs + 1
|
|
end
|
|
context.completed = context.completed + 1
|
|
|
|
print(
|
|
"Completed: "
|
|
.. context.completed
|
|
.. " out of "
|
|
.. context.expected
|
|
.. " (errors: "
|
|
.. context.errs
|
|
.. ", warnings: "
|
|
.. context.warn
|
|
.. ")"
|
|
)
|
|
|
|
if context.completed == context.expected then
|
|
if context.errs == 0 and context.warn == 0 then
|
|
-- Close the temporary floating window (but keep it alive if the
|
|
-- cursor is in it)
|
|
local cur_win = vim.api.nvim_get_current_win()
|
|
local cur_buf = vim.api.nvim_win_get_buf(cur_win)
|
|
if cur_buf ~= context.buffer then
|
|
vim.api.nvim_win_close(context.window, true)
|
|
end
|
|
print("All builds successful")
|
|
end
|
|
else
|
|
spawn_next(context)
|
|
end
|
|
end
|
|
|
|
if not projects then
|
|
projects = captureLoadedProjects()
|
|
end
|
|
if projects then
|
|
local total_projects = 0
|
|
for _, _ in ipairs(projects) do
|
|
total_projects = total_projects + 1
|
|
end
|
|
local context = BuildUtils.create_window()
|
|
context.warn = 0
|
|
context.errs = 0
|
|
context.completed = 0
|
|
context.expected = total_projects
|
|
context.projects = projects
|
|
|
|
spawn_next(context)
|
|
end
|
|
end
|
|
|
|
vim.api.nvim_create_user_command("BuildFSharpProject", function(opts)
|
|
if opts.fargs and opts.fargs[1] then
|
|
BuildFSharpProjects(opts.fargs)
|
|
else
|
|
local pickers = require("telescope.pickers")
|
|
local finders = require("telescope.finders")
|
|
local conf = require("telescope.config").values
|
|
local action_state = require("telescope.actions.state")
|
|
local actions = require("telescope.actions")
|
|
pickers
|
|
.new({}, {
|
|
prompt_title = "Projects",
|
|
finder = finders.new_table({
|
|
results = captureLoadedProjects(),
|
|
}),
|
|
sorter = conf.generic_sorter({}),
|
|
attach_mappings = function(prompt_buf, _)
|
|
actions.select_default:replace(function()
|
|
actions.close(prompt_buf)
|
|
local selection = action_state.get_selected_entry()
|
|
BuildFSharpProjects({ selection.value })
|
|
end)
|
|
return true
|
|
end,
|
|
})
|
|
:find()
|
|
end
|
|
end, { nargs = "?", complete = "file" })
|
|
|
|
local function TableConcat(tables)
|
|
local result = {}
|
|
for _, tab in ipairs(tables) do
|
|
for _, v in ipairs(tab) do
|
|
table.insert(result, v)
|
|
end
|
|
end
|
|
return result
|
|
end
|
|
|
|
-- args is a table that will be splatted into the command line and will be immediately
|
|
-- followed by the project.
|
|
local function RunDotnet(command, args, project, configuration)
|
|
local function on_line(data, _, context) end
|
|
|
|
local function on_complete(context, code, signal) end
|
|
|
|
local context = BuildUtils.create_window()
|
|
|
|
BuildUtils.run(
|
|
"dotnet",
|
|
TableConcat({ { command }, args, { project, "--configuration", configuration } }),
|
|
"dotnet",
|
|
context,
|
|
on_line,
|
|
on_complete
|
|
)
|
|
end
|
|
|
|
-- Call this as:
|
|
-- RunFSharpProject path/to/fsproj
|
|
-- RunFSharpProject Debug path/to/fsproj
|
|
vim.api.nvim_create_user_command("RunFSharpProject", function(opts)
|
|
local configuration = "Release"
|
|
if opts.fargs and opts.fargs[1] and opts.fargs[1]:match("sproj$") then
|
|
RunDotnet("run", { "--project" }, opts.fargs[1], configuration)
|
|
elseif opts.fargs and opts.fargs[1] and opts.fargs[2] then
|
|
configuration = opts.fargs[1]
|
|
RunDotnet("run", { "--project" }, opts.fargs[2], configuration)
|
|
else
|
|
configuration = opts.fargs[1]
|
|
local pickers = require("telescope.pickers")
|
|
local finders = require("telescope.finders")
|
|
local conf = require("telescope.config").values
|
|
local action_state = require("telescope.actions.state")
|
|
local actions = require("telescope.actions")
|
|
pickers
|
|
.new({}, {
|
|
prompt_title = "Projects",
|
|
finder = finders.new_table({
|
|
results = captureLoadedProjects(),
|
|
}),
|
|
sorter = conf.generic_sorter({}),
|
|
attach_mappings = function(prompt_buf, _)
|
|
actions.select_default:replace(function()
|
|
actions.close(prompt_buf)
|
|
local selection = action_state.get_selected_entry()
|
|
RunDotnet("run", { "--project" }, selection.value, configuration)
|
|
end)
|
|
return true
|
|
end,
|
|
})
|
|
:find()
|
|
end
|
|
end, { nargs = "*", complete = "file" })
|
|
|
|
vim.api.nvim_create_user_command("PublishFSharpProject", function(opts)
|
|
if opts.fargs and opts.fargs[1] then
|
|
RunDotnet("publish", {}, opts.fargs[1], "Release")
|
|
else
|
|
local pickers = require("telescope.pickers")
|
|
local finders = require("telescope.finders")
|
|
local conf = require("telescope.config").values
|
|
local action_state = require("telescope.actions.state")
|
|
local actions = require("telescope.actions")
|
|
pickers
|
|
.new({}, {
|
|
prompt_title = "Projects",
|
|
finder = finders.new_table({
|
|
results = captureLoadedProjects(),
|
|
}),
|
|
sorter = conf.generic_sorter({}),
|
|
attach_mappings = function(prompt_buf, _)
|
|
actions.select_default:replace(function()
|
|
actions.close(prompt_buf)
|
|
local selection = action_state.get_selected_entry()
|
|
RunDotnet("publish", {}, selection.value, "Release")
|
|
end)
|
|
return true
|
|
end,
|
|
})
|
|
:find()
|
|
end
|
|
end, { nargs = "*", complete = "file" })
|
|
|
|
vim.api.nvim_create_autocmd("FileType", {
|
|
pattern = "fsharp",
|
|
callback = function()
|
|
local status, whichkey = pcall(require, "which-key")
|
|
if status then
|
|
whichkey.register({
|
|
f = {
|
|
name = "F#",
|
|
t = { ":call fsharp#showTooltip()<CR>", "Show F# Tooltip" },
|
|
["si"] = { ":call fsharp#toggleFsi()<CR>", "Toggle FSI (F# Interactive)" },
|
|
["sl"] = { ":call fsharp#sendLineToFsi()<cr>", "Send line to FSI (F# Interactive)" },
|
|
r = {
|
|
name = "Run F# project",
|
|
d = { ":RunFSharpProject Debug", "Run F# project in debug configuration" },
|
|
r = { ":RunFSharpProject Release", "Run F# project in release configuration" },
|
|
},
|
|
p = {
|
|
":PublishFSharpProject",
|
|
"Publish F# project",
|
|
},
|
|
b = {
|
|
"Build F# project",
|
|
a = { BuildFSharpProjects, "Build all projects" },
|
|
s = { ":BuildFSharpProject", "Build specified project" },
|
|
},
|
|
},
|
|
}, { prefix = vim.api.nvim_get_var("maplocalleader"), buffer = vim.api.nvim_get_current_buf() })
|
|
else
|
|
vim.api.nvim_set_keymap("n", "<localleader>ft", ":call fsharp#showTooltip()<CR>", { noremap = true })
|
|
vim.api.nvim_set_keymap("n", "<localleader>fsi", ":call fsharp#toggleFsi()<CR>", { noremap = true })
|
|
vim.api.nvim_set_keymap("n", "<localleader>fsl", ":call fsharp#sendLineToFsi()<CR>", { noremap = true })
|
|
vim.api.nvim_set_keymap("n", "<localleader>bpa", ":lua BuildFSharpProjects()", { noremap = true })
|
|
vim.api.nvim_set_keymap("n", "<localleader>bps", ":BuildFSharpProject", { noremap = true })
|
|
end
|
|
end,
|
|
})
|