diff options
author | Maurus Cuelenaere <mcuelenaere@gmail.com> | 2009-05-21 19:01:41 +0000 |
---|---|---|
committer | Maurus Cuelenaere <mcuelenaere@gmail.com> | 2009-05-21 19:01:41 +0000 |
commit | cf87597226f5d6b269f1f2c4d6f402aa1eccb852 (patch) | |
tree | 4ba1f3ae53b3bd9cae0e2c6c4dd57836b43a5ece /apps/plugins/lua/lmem.h | |
parent | c483efadc63eaed35b5fb5e4e02c2282daf32470 (diff) | |
download | rockbox-cf87597226f5d6b269f1f2c4d6f402aa1eccb852.tar.gz rockbox-cf87597226f5d6b269f1f2c4d6f402aa1eccb852.zip |
Commit FS#9174: Lua scripting language by Dan Everton
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21020 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'apps/plugins/lua/lmem.h')
-rw-r--r-- | apps/plugins/lua/lmem.h | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/apps/plugins/lua/lmem.h b/apps/plugins/lua/lmem.h new file mode 100644 index 0000000000..97a888c7f8 --- /dev/null +++ b/apps/plugins/lua/lmem.h | |||
@@ -0,0 +1,49 @@ | |||
1 | /* | ||
2 | ** $Id$ | ||
3 | ** Interface to Memory Manager | ||
4 | ** See Copyright Notice in lua.h | ||
5 | */ | ||
6 | |||
7 | #ifndef lmem_h | ||
8 | #define lmem_h | ||
9 | |||
10 | |||
11 | #include <stddef.h> | ||
12 | |||
13 | #include "llimits.h" | ||
14 | #include "lua.h" | ||
15 | |||
16 | #define MEMERRMSG "not enough memory" | ||
17 | |||
18 | |||
19 | #define luaM_reallocv(L,b,on,n,e) \ | ||
20 | ((cast(size_t, (n)+1) <= MAX_SIZET/(e)) ? /* +1 to avoid warnings */ \ | ||
21 | luaM_realloc_(L, (b), (on)*(e), (n)*(e)) : \ | ||
22 | luaM_toobig(L)) | ||
23 | |||
24 | #define luaM_freemem(L, b, s) luaM_realloc_(L, (b), (s), 0) | ||
25 | #define luaM_free(L, b) luaM_realloc_(L, (b), sizeof(*(b)), 0) | ||
26 | #define luaM_freearray(L, b, n, t) luaM_reallocv(L, (b), n, 0, sizeof(t)) | ||
27 | |||
28 | #define luaM_malloc(L,t) luaM_realloc_(L, NULL, 0, (t)) | ||
29 | #define luaM_new(L,t) cast(t *, luaM_malloc(L, sizeof(t))) | ||
30 | #define luaM_newvector(L,n,t) \ | ||
31 | cast(t *, luaM_reallocv(L, NULL, 0, n, sizeof(t))) | ||
32 | |||
33 | #define luaM_growvector(L,v,nelems,size,t,limit,e) \ | ||
34 | if ((nelems)+1 > (size)) \ | ||
35 | ((v)=cast(t *, luaM_growaux_(L,v,&(size),sizeof(t),limit,e))) | ||
36 | |||
37 | #define luaM_reallocvector(L, v,oldn,n,t) \ | ||
38 | ((v)=cast(t *, luaM_reallocv(L, v, oldn, n, sizeof(t)))) | ||
39 | |||
40 | |||
41 | LUAI_FUNC void *luaM_realloc_ (lua_State *L, void *block, size_t oldsize, | ||
42 | size_t size); | ||
43 | LUAI_FUNC void *luaM_toobig (lua_State *L); | ||
44 | LUAI_FUNC void *luaM_growaux_ (lua_State *L, void *block, int *size, | ||
45 | size_t size_elem, int limit, | ||
46 | const char *errormsg); | ||
47 | |||
48 | #endif | ||
49 | |||