move OPT_QUIT into the lua registry

[apps/madmutt.git] / lib-lua / runtime.c

diff --git a/lib-lua/runtime.c b/lib-lua/runtime.c
index 8788ed5..7a351ee 100644 (file)
--- a/lib-lua/runtime.c
+++ b/lib-lua/runtime.c
@@ -21,6 +21,7 @@
 #include "lib-lua_priv.h"
 
 static lua_State *L;
+static reg_entry registry[LTK_count];
 
 static const luaL_Reg lualibs[] = {
     {"",              luaopen_base},
@@ -66,3 +67,30 @@ int mlua_wrap(void (*errfun)(const char *fmt, ...), int status)
     return status;
 }
 
+const char *mlua_reggets(int tk)
+{
+    if (registry[tk].type != REG_STR)
+        return NULL;
+    return registry[tk].s;
+}
+
+quadopt_t mlua_reggetq(int tk)
+{
+    if (registry[tk].type != REG_QUAD)
+        return -1;
+    return registry[tk].i;
+}
+
+void mlua_regsets(int tk, const char *s)
+{
+    reg_entry_wipe(registry + tk);
+    registry[tk].type = REG_STR;
+    registry[tk].s    = m_strdup(s);
+}
+
+void mlua_regsetq(int tk, quadopt_t q)
+{
+    reg_entry_wipe(registry + tk);
+    registry[tk].type = REG_QUAD;
+    registry[tk].i    = q;
+}