158 Zeilen
3.3 KiB
C++
158 Zeilen
3.3 KiB
C++
#include <catch2/catch.hpp>
|
|
#include "../../src/lua/to.hpp"
|
|
#include <string_view>
|
|
|
|
#define REQUIRE_TRY_TO(x) \
|
|
{ \
|
|
TestType v; \
|
|
REQUIRE(Lua::to<TestType>(L, -1, v)); \
|
|
REQUIRE(v == x); \
|
|
}
|
|
|
|
#define REQUIRE_TRY_TO_FAIL() \
|
|
{ \
|
|
const TestType org{42}; \
|
|
TestType v{org}; \
|
|
REQUIRE_FALSE(Lua::to<TestType>(L, -1, v)); \
|
|
REQUIRE(v == org); \
|
|
}
|
|
|
|
TEMPLATE_TEST_CASE("Lua::to<>", "[lua][lua-to]", int8_t, int16_t, int32_t, int64_t, uint8_t, uint16_t, uint32_t, uint64_t)
|
|
{
|
|
lua_State* L = luaL_newstate();
|
|
|
|
INFO("nil")
|
|
lua_pushnil(L);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("false")
|
|
lua_pushboolean(L, false);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("true")
|
|
lua_pushboolean(L, true);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("123")
|
|
lua_pushinteger(L, 123);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 123);
|
|
REQUIRE_TRY_TO(123);
|
|
lua_pop(L, 1);
|
|
|
|
INFO("1000")
|
|
lua_pushinteger(L, 1000);
|
|
if constexpr(std::numeric_limits<TestType>::max() < 1000)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 1000);
|
|
REQUIRE_TRY_TO(1000);
|
|
}
|
|
lua_pop(L, 1);
|
|
|
|
INFO("-1000")
|
|
lua_pushinteger(L, -1000);
|
|
if constexpr(std::is_unsigned_v<TestType>)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else if(std::numeric_limits<TestType>::min() > -1000)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == -1000);
|
|
REQUIRE_TRY_TO(-1000);
|
|
}
|
|
lua_pop(L, 1);
|
|
|
|
INFO("4.2")
|
|
lua_pushnumber(L, 4.2);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("\"123\"")
|
|
lua_pushliteral(L, "123");
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 123);
|
|
REQUIRE_TRY_TO(123);
|
|
lua_pop(L, 1);
|
|
|
|
INFO("\"1000\"")
|
|
lua_pushliteral(L, "1000");
|
|
if(std::numeric_limits<TestType>::max() < 1000)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 1000);
|
|
REQUIRE_TRY_TO(1000);
|
|
}
|
|
lua_pop(L, 1);
|
|
|
|
INFO("\"-1000\"")
|
|
lua_pushliteral(L, "-1000");
|
|
if constexpr(std::is_unsigned_v<TestType>)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else if(std::numeric_limits<TestType>::min() > -1000)
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
}
|
|
else
|
|
{
|
|
REQUIRE(Lua::to<TestType>(L, -1) == -1000);
|
|
REQUIRE_TRY_TO(-1000);
|
|
}
|
|
lua_pop(L, 1);
|
|
|
|
INFO("\"4.2\"")
|
|
lua_pushliteral(L, "4.2");
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("\"test\"")
|
|
lua_pushliteral(L, "test");
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("table")
|
|
lua_newtable(L);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("userdata")
|
|
lua_newuserdata(L, 0);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
INFO("lightuserdata")
|
|
lua_pushlightuserdata(L, nullptr);
|
|
REQUIRE(Lua::to<TestType>(L, -1) == 0);
|
|
REQUIRE_TRY_TO_FAIL();
|
|
lua_pop(L, 1);
|
|
|
|
lua_close(L);
|
|
}
|