22 lines
1.1 KiB
C
22 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
|
||
|
|
#pragma once
|
||
|
|
|
||
|
|
#include "lua.h"
|
||
|
|
|
||
|
|
#define luaM_new(L, t, size, memcat) cast_to(t*, luaM_new_(L, size, memcat))
|
||
|
|
#define luaM_free(L, p, size, memcat) luaM_free_(L, (p), size, memcat)
|
||
|
|
|
||
|
|
#define luaM_arraysize_(n, e) ((cast_to(size_t, (n)) <= SIZE_MAX / (e)) ? (n) * (e) : (luaM_toobig(L), SIZE_MAX))
|
||
|
|
|
||
|
|
#define luaM_newarray(L, n, t, memcat) cast_to(t*, luaM_new_(L, luaM_arraysize_(n, sizeof(t)), memcat))
|
||
|
|
#define luaM_freearray(L, b, n, t, memcat) luaM_free_(L, (b), (n) * sizeof(t), memcat)
|
||
|
|
#define luaM_reallocarray(L, v, oldn, n, t, memcat) \
|
||
|
|
((v) = cast_to(t*, luaM_realloc_(L, v, (oldn) * sizeof(t), luaM_arraysize_(n, sizeof(t)), memcat)))
|
||
|
|
|
||
|
|
LUAI_FUNC void* luaM_new_(lua_State* L, size_t nsize, uint8_t memcat);
|
||
|
|
LUAI_FUNC void luaM_free_(lua_State* L, void* block, size_t osize, uint8_t memcat);
|
||
|
|
LUAI_FUNC void* luaM_realloc_(lua_State* L, void* block, size_t osize, size_t nsize, uint8_t memcat);
|
||
|
|
|
||
|
|
LUAI_FUNC l_noret luaM_toobig(lua_State* L);
|