aboutsummaryrefslogtreecommitdiffstats
path: root/lib/sol2/tests/runtime_tests/source/tables.cpp
diff options
context:
space:
mode:
authorAndy Belle-Isle <drumsetmonkey@gmail.com>2019-08-30 00:19:31 -0400
committerAndy Belle-Isle <drumsetmonkey@gmail.com>2019-08-30 00:19:31 -0400
commitbd3fe0cac583739bc0d7c4b5c8f301bb350abca0 (patch)
tree7eeb1aabcebd6999de1c3457d0882246ec0ff4d4 /lib/sol2/tests/runtime_tests/source/tables.cpp
parent2662ac356ce14dacfbc91689fd37244facff4989 (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.cpp250
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);
-}