From 28e3e01ff86937e2b37912b945b58787429067b7 Mon Sep 17 00:00:00 2001
From: versat <versat@users.noreply.github.com>
Date: Thu, 19 Sep 2019 16:27:37 +0200
Subject: [PATCH] lua.cfg: Add some functions/macros, partly found by daca@home

---
 cfg/lua.cfg | 67 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 67 insertions(+)

diff --git a/cfg/lua.cfg b/cfg/lua.cfg
index 43eb71bcd..bf3971dff 100644
--- a/cfg/lua.cfg
+++ b/cfg/lua.cfg
@@ -9,6 +9,8 @@
   <podtype name="lua_Integer" sign="s"/>
   <!-- https://www.lua.org/manual/5.3/manual.html#lua_Unsigned -->
   <podtype name="lua_Unsigned" sign="u"/>
+  <!-- ########## Lua C API Defines / Macros ########## -->
+  <define name="define lua_setglobal(L,s)" value="lua_setfield(L, LUA_GLOBALSINDEX, s)"/>
   <!-- ########## Lua C API Functions ########## -->
   <!-- int lua_error (lua_State *L); -->
   <function name="lua_error">
@@ -188,6 +190,47 @@
       <not-bool/>
     </arg>
   </function>
+  <!-- int lua_rawequal (lua_State *L, int index1, int index2); -->
+  <function name="lua_rawequal">
+    <noreturn>false</noreturn>
+    <returnValue type="int"/>
+    <use-retval/>
+    <leak-ignore/>
+    <arg nr="1"/>
+    <arg nr="2" direction="in">
+      <not-uninit/>
+    </arg>
+    <arg nr="3" direction="in">
+      <not-uninit/>
+      <not-bool/>
+    </arg>
+  </function>
+  <!-- void lua_rawgeti (lua_State *L, int index, int n); -->
+  <function name="lua_rawgeti">
+    <noreturn>false</noreturn>
+    <returnValue type="void"/>
+    <leak-ignore/>
+    <arg nr="1"/>
+    <arg nr="2" direction="in">
+      <not-uninit/>
+    </arg>
+    <arg nr="3" direction="in">
+      <not-uninit/>
+    </arg>
+  </function>
+  <!-- void lua_setfield (lua_State *L, int index, const char *k); -->
+  <function name="lua_setfield">
+    <noreturn>false</noreturn>
+    <returnValue type="void"/>
+    <leak-ignore/>
+    <arg nr="1"/>
+    <arg nr="2" direction="in">
+      <not-uninit/>
+    </arg>
+    <arg nr="3" direction="in">
+      <not-uninit/>
+    </arg>
+  </function>
   <!-- const char *lua_tolstring (lua_State *L, int index, size_t *len); -->
   <function name="lua_tolstring">
     <noreturn>false</noreturn>
@@ -234,6 +277,30 @@
       <not-bool/>
     </arg>
   </function>
+  <!-- int lua_type (lua_State *L, int index); -->
+  <function name="lua_type">
+    <noreturn>false</noreturn>
+    <returnValue type="int"/>
+    <use-retval/>
+    <leak-ignore/>
+    <arg nr="1"/>
+    <arg nr="2" direction="in">
+      <not-uninit/>
+      <not-bool/>
+    </arg>
+  </function>
+  <!-- const char *lua_typename (lua_State *L, int tp); -->
+  <function name="lua_typename">
+    <noreturn>false</noreturn>
+    <returnValue type="const char *"/>
+    <use-retval/>
+    <leak-ignore/>
+    <arg nr="1"/>
+    <arg nr="2" direction="in">
+      <not-uninit/>
+      <not-bool/>
+    </arg>
+  </function>
   <!-- int luaL_error (lua_State *L, const char *fmt, ...); -->
   <function name="luaL_error">
     <noreturn>true</noreturn>