diff options
Diffstat (limited to 'lmem.h')
-rw-r--r-- | lmem.h | 22 |
1 files changed, 12 insertions, 10 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lmem.h,v 1.8 1999/02/26 15:48:55 roberto Exp roberto $ | 2 | ** $Id: lmem.h,v 1.9 1999/08/16 20:52:00 roberto Exp roberto $ |
3 | ** Interface to Memory Manager | 3 | ** Interface to Memory Manager |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -10,6 +10,8 @@ | |||
10 | 10 | ||
11 | #include <stdlib.h> | 11 | #include <stdlib.h> |
12 | 12 | ||
13 | #include "lua.h" | ||
14 | |||
13 | /* memory error messages */ | 15 | /* memory error messages */ |
14 | #define codeEM "code size overflow" | 16 | #define codeEM "code size overflow" |
15 | #define constantEM "constant table overflow" | 17 | #define constantEM "constant table overflow" |
@@ -18,17 +20,17 @@ | |||
18 | #define memEM "not enough memory" | 20 | #define memEM "not enough memory" |
19 | #define arrEM "internal array bigger than `int' limit" | 21 | #define arrEM "internal array bigger than `int' limit" |
20 | 22 | ||
21 | void *luaM_realloc (void *oldblock, unsigned long size); | 23 | void *luaM_realloc (lua_State *L, void *oldblock, unsigned long size); |
22 | void *luaM_growaux (void *block, unsigned long nelems, int inc, int size, | 24 | void *luaM_growaux (lua_State *L, void *block, unsigned long nelems, int inc, int size, |
23 | const char *errormsg, unsigned long limit); | 25 | const char *errormsg, unsigned long limit); |
24 | 26 | ||
25 | #define luaM_free(b) luaM_realloc((b), 0) | 27 | #define luaM_free(L, b) luaM_realloc(L, (b), 0) |
26 | #define luaM_malloc(t) luaM_realloc(NULL, (t)) | 28 | #define luaM_malloc(L, t) luaM_realloc(L, NULL, (t)) |
27 | #define luaM_new(t) ((t *)luaM_malloc(sizeof(t))) | 29 | #define luaM_new(L, t) ((t *)luaM_malloc(L, sizeof(t))) |
28 | #define luaM_newvector(n,t) ((t *)luaM_malloc((n)*sizeof(t))) | 30 | #define luaM_newvector(L, n,t) ((t *)luaM_malloc(L, (n)*sizeof(t))) |
29 | #define luaM_growvector(v,nelems,inc,t,e,l) \ | 31 | #define luaM_growvector(L, v,nelems,inc,t,e,l) \ |
30 | ((v)=(t *)luaM_growaux(v,nelems,inc,sizeof(t),e,l)) | 32 | ((v)=(t *)luaM_growaux(L, v,nelems,inc,sizeof(t),e,l)) |
31 | #define luaM_reallocvector(v,n,t) ((v)=(t *)luaM_realloc(v,(n)*sizeof(t))) | 33 | #define luaM_reallocvector(L, v,n,t) ((v)=(t *)luaM_realloc(L, v,(n)*sizeof(t))) |
32 | 34 | ||
33 | 35 | ||
34 | #ifdef DEBUG | 36 | #ifdef DEBUG |