Lua tests (#158)

* Fix float comparison in tests * Lua tests
2018-01-31 15:27:23 +01:00
parent 7c1ffea19c
commit dfd28160a0
9 changed files with 595 additions and 5 deletions
--- a/tests/Engine/Lua/LuaCoroutine.cpp
+++ b/tests/Engine/Lua/LuaCoroutine.cpp
@@ -0,0 +1,31 @@
+#include <Nazara/Lua/LuaCoroutine.hpp>
+#include <Catch/catch.hpp>
+#include <Nazara/Lua/LuaInstance.hpp>
+
+SCENARIO("LuaCoroutine", "[LUA][LUACOROUTINE]")
+{
+	GIVEN("One lua with coroutine")
+	{
+		Nz::LuaInstance luaInstance;
+		luaInstance.LoadLibraries(Nz::LuaLib_Coroutine);
+
+		REQUIRE(luaInstance.ExecuteFromFile("resources/Engine/Lua/LuaCoroutine.lua"));
+
+		Nz::LuaCoroutine coroutine = luaInstance.NewCoroutine();
+		REQUIRE(coroutine.GetGlobal("infinite") == Nz::LuaType_Function);
+		coroutine.PushInteger(4);
+		CHECK(coroutine.Call(1));
+
+		coroutine.Resume();
+		CHECK(coroutine.CheckInteger(1) == 1);
+		coroutine.Resume();
+		CHECK(coroutine.CheckInteger(1) == -1);
+		coroutine.Resume();
+		CHECK(coroutine.CheckInteger(1) == 0);
+		coroutine.Resume();
+		CHECK(coroutine.CheckInteger(1) == 1);
+
+		coroutine.Resume();
+		CHECK_FALSE(coroutine.CanResume());
+	}
+}