| 1005 | |
| 1006 | |
| 1007 | LUA_API lua_Alloc lua_getallocf (lua_State *L, void **ud) { |
| 1008 | lua_Alloc f; |
| 1009 | lua_lock(L); |
| 1010 | if (ud) *ud = G(L)->ud; |
| 1011 | f = G(L)->frealloc; |
| 1012 | lua_unlock(L); |
| 1013 | return f; |
| 1014 | } |
| 1015 | |
| 1016 | |
| 1017 | LUA_API void lua_setallocf (lua_State *L, lua_Alloc f, void *ud) { |