diff options
author | Andy Belle-Isle <drumsetmonkey@gmail.com> | 2019-08-30 00:19:31 -0400 |
---|---|---|
committer | Andy Belle-Isle <drumsetmonkey@gmail.com> | 2019-08-30 00:19:31 -0400 |
commit | bd3fe0cac583739bc0d7c4b5c8f301bb350abca0 (patch) | |
tree | 7eeb1aabcebd6999de1c3457d0882246ec0ff4d4 /lib/sol2/tests/runtime_tests/source/tables.cpp | |
parent | 2662ac356ce14dacfbc91689fd37244facff4989 (diff) |
Renamed lib to deps so github will ignore it for language stats
Diffstat (limited to 'lib/sol2/tests/runtime_tests/source/tables.cpp')
-rw-r--r-- | lib/sol2/tests/runtime_tests/source/tables.cpp | 250 |
1 files changed, 0 insertions, 250 deletions
diff --git a/lib/sol2/tests/runtime_tests/source/tables.cpp b/lib/sol2/tests/runtime_tests/source/tables.cpp deleted file mode 100644 index a6b45cc..0000000 --- a/lib/sol2/tests/runtime_tests/source/tables.cpp +++ /dev/null @@ -1,250 +0,0 @@ -// sol3 - -// The MIT License (MIT) - -// Copyright (c) 2013-2019 Rapptz, ThePhD and contributors - -// Permission is hereby granted, free of charge, to any person obtaining a copy of -// this software and associated documentation files (the "Software"), to deal in -// the Software without restriction, including without limitation the rights to -// use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of -// the Software, and to permit persons to whom the Software is furnished to do so, -// subject to the following conditions: - -// The above copyright notice and this permission notice shall be included in all -// copies or substantial portions of the Software. - -// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR -// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS -// FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR -// COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER -// IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN -// CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. - -#include "sol_test.hpp" - -#include <catch.hpp> - -#include <iostream> -#include <algorithm> -#include <numeric> -#include <vector> - -std::string free_function() { - INFO("free_function()"); - return "test"; -} - -struct object { - std::string operator()() { - INFO("member_test()"); - return "test"; - } -}; - -TEST_CASE("tables/cleanup", "make sure tables leave the stack balanced") { - sol::state lua; - sol::stack_guard luasg(lua); - lua.open_libraries(); - - auto f = [] { return 5; }; - for (int i = 0; i < 30; i++) { - std::string name = std::string("init") + std::to_string(i); - int top = lua_gettop(lua); - lua[name] = f; - int aftertop = lua_gettop(lua); - REQUIRE(aftertop == top); - int val = lua[name](); - REQUIRE(val == 5); - } -} - -TEST_CASE("tables/nested cleanup", "make sure tables leave the stack balanced") { - sol::state lua; - lua.open_libraries(); - - lua.safe_script("A={}"); - auto f = [] { return 5; }; - for (int i = 0; i < 30; i++) { - std::string name = std::string("init") + std::to_string(i); - int top = lua_gettop(lua); - auto A = lua["A"]; - int beforetop = lua_gettop(lua); - REQUIRE(beforetop == top); - A[name] = f; - int aftertop = lua_gettop(lua); - REQUIRE(aftertop == top); - int val = A[name](); - REQUIRE(val == 5); - } -} - -TEST_CASE("tables/variables", "Check if tables and variables work as intended") { - sol::state lua; - lua.open_libraries(sol::lib::base, sol::lib::os); - lua.get<sol::table>("os").set("name", "windows"); - { - auto result = lua.safe_script("assert(os.name == \"windows\")", sol::script_pass_on_error); - REQUIRE(result.valid()); - } -} - -TEST_CASE("tables/create", "Check if creating a table is kosher") { - sol::state lua; - lua["testtable"] = sol::table::create(lua.lua_state(), 0, 0, "Woof", "Bark", 1, 2, 3, 4); - sol::object testobj = lua["testtable"]; - REQUIRE(testobj.is<sol::table>()); - sol::table testtable = testobj.as<sol::table>(); - REQUIRE((testtable["Woof"] == std::string("Bark"))); - REQUIRE((testtable[1] == 2)); - REQUIRE((testtable[3] == 4)); -} - -TEST_CASE("tables/create local", "Check if creating a table is kosher") { - sol::state lua; - lua["testtable"] = lua.create_table(0, 0, "Woof", "Bark", 1, 2, 3, 4); - sol::object testobj = lua["testtable"]; - REQUIRE(testobj.is<sol::table>()); - sol::table testtable = testobj.as<sol::table>(); - REQUIRE((testtable["Woof"] == std::string("Bark"))); - REQUIRE((testtable[1] == 2)); - REQUIRE((testtable[3] == 4)); -} - -TEST_CASE("tables/create local named", "Check if creating a table is kosher") { - sol::state lua; - sol::table testtable = lua.create_table("testtable", 0, 0, "Woof", "Bark", 1, 2, 3, 4); - sol::object testobj = lua["testtable"]; - REQUIRE(testobj.is<sol::table>()); - REQUIRE((testobj == testtable)); - REQUIRE_FALSE((testobj != testtable)); - REQUIRE((testtable["Woof"] == std::string("Bark"))); - REQUIRE((testtable[1] == 2)); - REQUIRE((testtable[3] == 4)); -} - -TEST_CASE("tables/create-with-local", "Check if creating a table is kosher") { - sol::state lua; - lua["testtable"] = lua.create_table_with("Woof", "Bark", 1, 2, 3, 4); - sol::object testobj = lua["testtable"]; - REQUIRE(testobj.is<sol::table>()); - sol::table testtable = testobj.as<sol::table>(); - REQUIRE((testtable["Woof"] == std::string("Bark"))); - REQUIRE((testtable[1] == 2)); - REQUIRE((testtable[3] == 4)); -} - -TEST_CASE("tables/function variables", "Check if tables and function calls work as intended") { - sol::state lua; - lua.open_libraries(sol::lib::base, sol::lib::os); - auto run_script = [](sol::state& lua) -> void { lua.safe_script("assert(os.fun() == \"test\")"); }; - - lua.get<sol::table>("os").set_function("fun", []() { - INFO("stateless lambda()"); - return "test"; - }); - REQUIRE_NOTHROW(run_script(lua)); - - lua.get<sol::table>("os").set_function("fun", &free_function); - REQUIRE_NOTHROW(run_script(lua)); - - // l-value, canNOT optimise - // prefer value semantics unless wrapped with std::reference_wrapper - { - auto lval = object(); - lua.get<sol::table>("os").set_function("fun", &object::operator(), lval); - } - REQUIRE_NOTHROW(run_script(lua)); - - auto reflval = object(); - lua.get<sol::table>("os").set_function("fun", &object::operator(), std::ref(reflval)); - REQUIRE_NOTHROW(run_script(lua)); - - // stateful lambda: non-convertible, cannot be optimised - int breakit = 50; - lua.get<sol::table>("os").set_function("fun", [&breakit]() { - INFO("stateful lambda() with breakit:" << breakit); - return "test"; - }); - REQUIRE_NOTHROW(run_script(lua)); - - // r-value, cannot optimise - lua.get<sol::table>("os").set_function("fun", &object::operator(), object()); - REQUIRE_NOTHROW(run_script(lua)); - - // r-value, cannot optimise - auto rval = object(); - lua.get<sol::table>("os").set_function("fun", &object::operator(), std::move(rval)); - REQUIRE_NOTHROW(run_script(lua)); -} - -TEST_CASE("tables/add", "Basic test to make sure the 'add' feature works") { - static const int sz = 120; - - sol::state lua; - sol::table t = lua.create_table(sz, 0); - - std::vector<int> bigvec(sz); - std::iota(bigvec.begin(), bigvec.end(), 1); - - for (std::size_t i = 0; i < bigvec.size(); ++i) { - t.add(bigvec[i]); - } - for (std::size_t i = 0; i < bigvec.size(); ++i) { - int val = t[i + 1]; - REQUIRE(val == bigvec[i]); - } -} - -TEST_CASE("tables/raw set and raw get", "ensure raw setting and getting works through metatables") { - sol::state lua; - sol::table t = lua.create_table(); - t[sol::metatable_key] = lua.create_table_with(sol::meta_function::new_index, - [](lua_State* L) { return luaL_error(L, "nay"); }, - sol::meta_function::index, - [](lua_State* L) { return luaL_error(L, "nay"); }); - t.raw_set("a", 2.5); - double la = t.raw_get<double>("a"); - REQUIRE(la == 2.5); -} - -TEST_CASE("tables/boolean keys", "make sure boolean keys don't get caught up in `is_integral` specializations") { - sol::state lua; - lua.open_libraries(sol::lib::base); - - lua.safe_script(R"( -tbl = {} -tbl[true] = 10 -tbl[1] = 20 - -print(tbl[true]) -print(tbl[1]) -)"); - sol::table tbl = lua["tbl"]; - int v1 = tbl[true]; - int v2 = tbl[1]; - REQUIRE(v1 == 10); - REQUIRE(v2 == 20); - - tbl[true] = 30; - tbl[1] = 40; - v1 = tbl[true]; - v2 = tbl[1]; - REQUIRE(v1 == 30); - REQUIRE(v2 == 40); -} - -TEST_CASE("tables/optional move", "ensure pushing a sol::optional<T> rvalue correctly moves the contained object into tables") { - sol::state sol_state; - struct move_only { - int secret_code; - move_only(int sc) : secret_code(sc) {} - - move_only(const move_only&) = delete; - move_only(move_only&&) = default; - move_only& operator=(const move_only&) = delete; - move_only& operator=(move_only&&) = default; - }; - sol_state["requires_move"] = sol::optional<move_only>(move_only(0x4D)); - REQUIRE(sol_state["requires_move"].get<move_only>().secret_code == 0x4D); -} |