lua

A copy of the Lua development repository
Log | Files | Refs | README

commit 08f902cf495752494088392a86f11a22755cc8cb
parent d3c304e92e5581bb7b8b7c5a61beb0a6faa108c2
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri,  9 Feb 2007 11:04:29 -0200

better documentation for auxiliary functions (that should be called only
through specific macros).

Diffstat:
Mlmem.h | 5+++--
Mlvm.c | 4++--
Mlvm.h | 8+++++---
3 files changed, 10 insertions(+), 7 deletions(-)

diff --git a/lmem.h b/lmem.h @@ -1,5 +1,5 @@ /* -** $Id: lmem.h,v 1.31 2005/04/25 19:24:10 roberto Exp roberto $ +** $Id: lmem.h,v 1.32 2006/09/14 18:42:28 roberto Exp roberto $ ** Interface to Memory Manager ** See Copyright Notice in lua.h */ @@ -37,10 +37,11 @@ #define luaM_reallocvector(L, v,oldn,n,t) \ ((v)=cast(t *, luaM_reallocv(L, v, oldn, n, sizeof(t)))) +LUAI_FUNC void *luaM_toobig (lua_State *L); +/* not to be called directly */ LUAI_FUNC void *luaM_realloc_ (lua_State *L, void *block, size_t oldsize, size_t size); -LUAI_FUNC void *luaM_toobig (lua_State *L); LUAI_FUNC void *luaM_growaux_ (lua_State *L, void *block, int *size, size_t size_elem, int limit, const char *what); diff --git a/lvm.c b/lvm.c @@ -1,5 +1,5 @@ /* -** $Id: lvm.c,v 2.68 2006/09/19 13:57:50 roberto Exp roberto $ +** $Id: lvm.c,v 2.69 2006/09/19 14:06:45 roberto Exp roberto $ ** Lua virtual machine ** See Copyright Notice in lua.h */ @@ -247,7 +247,7 @@ static int lessequal (lua_State *L, const TValue *l, const TValue *r) { } -int luaV_equalval (lua_State *L, const TValue *t1, const TValue *t2) { +int luaV_equalval_ (lua_State *L, const TValue *t1, const TValue *t2) { const TValue *tm; lua_assert(ttype(t1) == ttype(t2)); switch (ttype(t1)) { diff --git a/lvm.h b/lvm.h @@ -1,5 +1,5 @@ /* -** $Id: lvm.h,v 2.4 2005/04/25 19:24:10 roberto Exp roberto $ +** $Id: lvm.h,v 2.5 2005/08/22 18:54:49 roberto Exp roberto $ ** Lua virtual machine ** See Copyright Notice in lua.h */ @@ -19,11 +19,13 @@ (((o) = luaV_tonumber(o,n)) != NULL)) #define equalobj(L,o1,o2) \ - (ttype(o1) == ttype(o2) && luaV_equalval(L, o1, o2)) + (ttype(o1) == ttype(o2) && luaV_equalval_(L, o1, o2)) +/* not to called directly */ +LUAI_FUNC int luaV_equalval_ (lua_State *L, const TValue *t1, const TValue *t2); + LUAI_FUNC int luaV_lessthan (lua_State *L, const TValue *l, const TValue *r); -LUAI_FUNC int luaV_equalval (lua_State *L, const TValue *t1, const TValue *t2); LUAI_FUNC const TValue *luaV_tonumber (const TValue *obj, TValue *n); LUAI_FUNC int luaV_tostring (lua_State *L, StkId obj); LUAI_FUNC void luaV_gettable (lua_State *L, const TValue *t, TValue *key,