add honey_exit

4 files changed, 27 insertions, 0 deletions

diff --git a/demo/main.lua b/demo/main.lua
index 26fabd9..46a9947 100644
--- a/demo/main.lua
+++ b/demo/main.lua
@@ -18,6 +18,7 @@ end
 honey.window.set_title('honey engine demo')
 
 honey.input.key.bind(honey.input.key.a, a_func)
+honey.input.key.bind(honey.input.key.escape, honey.exit)
 honey.window.resize_bind(resize_func)
 honey.input.mouse.set_mode( honey.input.mouse.mode.disabled )
 honey.input.mouse.bind_movement(mousemove)
diff --git a/src/common.h b/src/common.h
index 9027712..c87992a 100644
--- a/src/common.h
+++ b/src/common.h
@@ -179,4 +179,10 @@ int honey_lua_traceback(lua_State* L);
  */
 int honey_lua_pcall(lua_State* L, int nargs, int nret);
 
+/** @brief Trigger honey to exit.
+ *
+ * @returns Nothing.
+ */
+int honey_exit(lua_State* L);
+
 #endif
diff --git a/src/honey.c b/src/honey.c
index 9e8bc45..c3b4856 100644
--- a/src/honey.c
+++ b/src/honey.c
@@ -70,6 +70,9 @@ bool honey_setup(lua_State** L)
     honey_setup_input(*L);
     lua_setfield(*L, -2, "input");
 
+    lua_pushcfunction(*L, honey_exit);
+    lua_setfield(*L, -2, "exit");
+
     lua_setglobal(*L, "honey");
 
     return true;
diff --git a/src/honey_lua.c b/src/honey_lua.c
index 4dd0667..1d1375f 100644
--- a/src/honey_lua.c
+++ b/src/honey_lua.c
@@ -273,3 +273,20 @@ int honey_lua_pcall(lua_State* L, int nargs, int nret)
     return result;
 }
     
+/* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ */
+
+int honey_exit(lua_State* L)
+{
+    if (honey_window_info_ref == LUA_NOREF ||
+        honey_window_info_ref == LUA_REFNIL) {
+        lua_pushstring(L, "Window information is not set!");
+        lua_error(L);
+    }
+
+    lua_rawgeti(L, LUA_REGISTRYINDEX, honey_window_info_ref);
+    honey_window_information* info = lua_touserdata(L, -1);
+    lua_pop(L, 1);
+
+    glfwSetWindowShouldClose(info->window, true);
+    return 0;
+}