From 5155816b7b925dec5d5feb1568b1d7ceb00938b9 Mon Sep 17 00:00:00 2001
From: Mike Vink <mike@pionative.com>
Date: Mon, 3 Feb 2025 21:29:42 +0100
Subject: fetch tarball

---
 spec/loader_spec.lua | 73 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 73 insertions(+)
 create mode 100644 spec/loader_spec.lua

(limited to 'spec/loader_spec.lua')

diff --git a/spec/loader_spec.lua b/spec/loader_spec.lua
new file mode 100644
index 0000000..bd95a29
--- /dev/null
+++ b/spec/loader_spec.lua
@@ -0,0 +1,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)
-- 
cgit v1.2.3