?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1. /*
  2. ** $Id: lmem.h,v 1.31.1.1 2007/12/27 13:02:25 roberto Exp $
  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.  
  50.