From 42ec7286b2d36a9ba22925f816a17cb1cc2aa5ce Mon Sep 17 00:00:00 2001 From: chai Date: Sat, 30 Oct 2021 11:32:16 +0800 Subject: + Penlight --- Data/Libraries/Penlight/tests/test-compat.lua | 29 +++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 Data/Libraries/Penlight/tests/test-compat.lua (limited to 'Data/Libraries/Penlight/tests/test-compat.lua') diff --git a/Data/Libraries/Penlight/tests/test-compat.lua b/Data/Libraries/Penlight/tests/test-compat.lua new file mode 100644 index 0000000..c4a2724 --- /dev/null +++ b/Data/Libraries/Penlight/tests/test-compat.lua @@ -0,0 +1,29 @@ +local test = require 'pl.test' +local asserteq = test.asserteq + +local compat = require "pl.compat" +local coroutine = require "coroutine" + +local code_generator = coroutine.wrap(function() + local result = {"ret", "urn \"Hello World!\""} + for _,v in ipairs(result) do + coroutine.yield(v) + end + coroutine.yield(nil) +end) + +local f, err = compat.load(code_generator) +asserteq(err, nil) +asserteq(f(), "Hello World!") + + +-- package.searchpath +if compat.lua51 and not compat.jit then + assert(package.searchpath("pl.compat", package.path):match("lua[/\\]pl[/\\]compat")) + + local path = "some/?/nice.path;another/?.path" + local ok, err = package.searchpath("my.file.name", path, ".", "/") + asserteq(err, "\tno file 'some/my/file/name/nice.path'\n\tno file 'another/my/file/name.path'") + local ok, err = package.searchpath("my/file/name", path, "/", ".") + asserteq(err, "\tno file 'some/my.file.name/nice.path'\n\tno file 'another/my.file.name.path'") +end \ No newline at end of file -- cgit v1.1-26-g67d0