threads

README.md

@@ -65,7 +65,7 @@ API coverage:
 | `lua_load` | Not supported |
 | `lua_newstate` | `require('lualua').newstate()` |
 | `lua_newtable` | `s:newtable()` |
-| `lua_newthread` | Not supported |
+| `lua_newthread` | `th = s:newthread()` |
 | `lua_newuserdata` | `t = s:newuserdata()` |
 | `lua_next` | `b = s:next(index)` |
 | `lua_objlen` | `n = s:objlen(index)` |

lualua.c

@@ -323,6 +323,13 @@ static int lualua_newtable(lua_State *L) {
   return 0;
 }
 
+static int lualua_newthread(lua_State *L) {
+  lualua_State *S = lualua_checkstate(L, 1);
+  lualua_checkoverflow(S, 1);
+  lua_newthread(S->state);
+  return 1;
+}
+
 static int lualua_newuserdata(lua_State *L) {
   lualua_State *S = lualua_checkstate(L, 1);
   lualua_checkoverflow(S, 1);
@@ -706,6 +713,7 @@ static const struct luaL_Reg lualua_state_index[] = {
     {"lessthan", lualua_lessthan},
     {"loadstring", lualua_loadstring},
     {"newtable", lualua_newtable},
+    {"newthread", lualua_newthread},
     {"newuserdata", lualua_newuserdata},
     {"next", lualua_next},
     {"objlen", lualua_objlen},

spec/lualua_spec.lua

@@ -661,6 +661,21 @@ describe('lualua', function()
       end)
     end)
 
+    describe('newthread', function()
+      it('works', function()
+        local s = lib.newstate()
+        nr(1, s:newthread())
+        assert(true, s:isthread(1))
+      end)
+      it('fails on full stack', function()
+        local s = lib.newstate()
+        for _ = 1, lib.MINSTACK do
+          nr(1, s:newthread())
+        end
+        assertFails('stack overflow', s.newthread, s)
+      end)
+    end)
+
     describe('newuserdata', function()
       it('works', function()
         local s = lib.newstate()