mirror of
https://github.com/luau-lang/luau.git
synced 2024-12-14 06:00:39 +00:00
8fe95c9963
- TableOperations lint now includes a warning for table.create(N, {}) (which is likely a mistake since the table is shared by all entries)
- Type checker now type checks #v when v is a union
- Parser now rejects sources that consists of a single unfinished long comment
- Work around significant MSVC 2022 performance regression, bringing it more or less in line with MSVC 2019
- Compiler now predicts array size for newly allocated tables when the table is filled in a short loop
- Small improvements in compilation throughput (~2% faster)
- Implement paged sweeper for GC which improves sweep throughput 2-3x and reduces memory consumption by 8 bytes per object (once it is stabilized we will see additional 8 bytes per object of savings)
- Improve Repl Tab completion
- Repl now supports -i (interactive mode to run code in context of a script's environment) and -On (to control optimization flags)
37 lines
1.1 KiB
C++
37 lines
1.1 KiB
C++
// This file is part of the Luau programming language and is licensed under MIT License; see LICENSE.txt for details
|
|
// This code is based on Lua 5.x implementation licensed under MIT License; see lua_LICENSE.txt for details
|
|
#include "ludata.h"
|
|
|
|
#include "lgc.h"
|
|
#include "lmem.h"
|
|
|
|
#include <string.h>
|
|
|
|
Udata* luaU_newudata(lua_State* L, size_t s, int tag)
|
|
{
|
|
if (s > INT_MAX - sizeof(Udata))
|
|
luaM_toobig(L);
|
|
Udata* u = luaM_newgco(L, Udata, sizeudata(s), L->activememcat);
|
|
luaC_link(L, u, LUA_TUSERDATA);
|
|
u->len = int(s);
|
|
u->metatable = NULL;
|
|
LUAU_ASSERT(tag >= 0 && tag <= 255);
|
|
u->tag = uint8_t(tag);
|
|
return u;
|
|
}
|
|
|
|
void luaU_freeudata(lua_State* L, Udata* u, lua_Page* page)
|
|
{
|
|
LUAU_ASSERT(u->tag < LUA_UTAG_LIMIT || u->tag == UTAG_IDTOR);
|
|
|
|
void (*dtor)(void*) = nullptr;
|
|
if (u->tag == UTAG_IDTOR)
|
|
memcpy(&dtor, &u->data + u->len - sizeof(dtor), sizeof(dtor));
|
|
else if (u->tag)
|
|
dtor = L->global->udatagc[u->tag];
|
|
|
|
if (dtor)
|
|
dtor(u->data);
|
|
|
|
luaM_freegco(L, u, sizeudata(u->len), u->memcat, page);
|
|
}
|