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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
local test_env = require("spec.util.test_env")
local run = test_env.run
local testing_paths = test_env.testing_paths
local write_file = test_env.write_file
describe("luarocks.loader", function()
before_each(function()
test_env.setup_specs()
end)
describe("#integration", function()
it("respects version constraints", function()
test_env.run_in_tmp(function(tmpdir)
write_file("rock_b_01.lua", "print('ROCK B 0.1'); return {}")
write_file("rock_b-0.1-1.rockspec", [[
package = "rock_b"
version = "0.1-1"
source = {
url = "file://]] .. tmpdir:gsub("\\", "/") .. [[/rock_b_01.lua"
}
build = {
type = "builtin",
modules = {
rock_b = "rock_b_01.lua"
}
}
]])
write_file("rock_b_10.lua", "print('ROCK B 1.0'); return {}")
write_file("rock_b-1.0-1.rockspec", [[
package = "rock_b"
version = "1.0-1"
source = {
url = "file://]] .. tmpdir:gsub("\\", "/") .. [[/rock_b_10.lua"
}
build = {
type = "builtin",
modules = {
rock_b = "rock_b_10.lua"
}
}
]])
write_file("rock_a.lua", "require('rock_b'); return {}")
write_file("rock_a-2.0-1.rockspec", [[
package = "rock_a"
version = "2.0-1"
source = {
url = "file://]] .. tmpdir:gsub("\\", "/") .. [[/rock_a.lua"
}
dependencies = {
"rock_b < 1.0",
}
build = {
type = "builtin",
modules = {
rock_a = "rock_a.lua"
}
}
]])
print(run.luarocks("make --server=" .. testing_paths.fixtures_dir .. "/a_repo --tree=" .. testing_paths.testing_tree .. " ./rock_b-0.1-1.rockspec"))
print(run.luarocks("make --server=" .. testing_paths.fixtures_dir .. "/a_repo --tree=" .. testing_paths.testing_tree .. " ./rock_b-1.0-1.rockspec --keep"))
print(run.luarocks("make --server=" .. testing_paths.fixtures_dir .. "/a_repo --tree=" .. testing_paths.testing_tree .. " ./rock_a-2.0-1.rockspec"))
local output = run.lua([[-e "require 'luarocks.loader'; require('rock_a')"]])
assert.matches("ROCK B 0.1", output, 1, true)
end, finally)
end)
end)
end)
|
