Function skr_lua_newstate

modules/engine/lua/src/build.skr_lua.cpp:142–212

}

lua_State* skr_lua_newstate(skr_vfs_t* vfs)
{
    lua_State* L = lua_newstate(
    +[](void* ud, void* ptr, size_t osize, size_t nsize) -> void* {
        if (nsize == 0)
        {
            sakura_free(ptr);
            return nullptr;
        }
        else if (osize == 0)
        {
            return sakura_malloc(nsize);
        }
        else
        {
            return sakura_realloc(ptr, nsize);
        }
    },
    nullptr);
    auto extra = SkrNew<skr_lua_state_extra_t>();
    extra->vfs = vfs;
    *(void**)lua_getextraspace(L) = extra;

    // open standard libraries
    luaL_openlibs(L);
    luaopen_package(L);
    // // insert loader
    // lua_pushcfunction(L,skr_load_file,"skr_load_file");
    // int loaderFunc = lua_gettop(L);

    // lua_getglobal(L,"package");
    // lua_getfield(L,-1,"searchers");

    // int loaderTable = lua_gettop(L);

    // for(auto i = lua_objlen(L,loaderTable) + 1; i > 2u; i--) 
    // {
    //     lua_rawgeti(L,loaderTable,i-1);
    //     lua_rawseti(L,loaderTable,i);
    // }
    // lua_pushvalue(L,loaderFunc);
    // lua_rawseti(L,loaderTable,2);
    // lua_settop(L, 0);

    // create skr global table
    lua_newtable(L);
    lua_pushvalue(L, -1);
    lua_setglobal(L, "skr");
    lua_pop(L, 1);

    // bind utilities
    lua_pushcfunction(L, +[](lua_State* L) -> int {
        auto asize = luaL_checkinteger(L, 1);
        auto nsize = luaL_checkinteger(L, 2);
        lua_createtable(L, (int)asize, (int)nsize);
        return 1;
    }, "newtable");
    lua_setglobal(L, "newtable");