1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
local Result = require "mason-core.result"
local _ = require "mason-core.functional"
local installer = require "mason-core.installer"
local log = require "mason-core.log"
local path = require "mason-core.path"
local platform = require "mason-core.platform"
local M = {}
---@async
---@param package string
---@param version string
---@nodiscard
function M.install(package, version)
log.fmt_debug("opam: install %s %s", package, version)
local ctx = installer.context()
ctx.stdio_sink.stdout(("Installing opam package %s@%s…\n"):format(package, version))
return ctx.spawn.opam {
"install",
"--destdir=.",
"--yes",
"--verbose",
("%s.%s"):format(package, version),
}
end
---@param bin string
function M.bin_path(bin)
return Result.pcall(platform.when, {
unix = function()
return path.concat { "bin", bin }
end,
win = function()
return path.concat { "bin", ("%s.exe"):format(bin) }
end,
})
end
return M
|