#if wraps compatibility issue
This commit is contained in:
19
lua.h
19
lua.h
@@ -2,14 +2,14 @@
|
|||||||
** LUA - An Extensible Extension Language
|
** LUA - An Extensible Extension Language
|
||||||
** TeCGraf: Grupo de Tecnologia em Computacao Grafica, PUC-Rio, Brazil
|
** TeCGraf: Grupo de Tecnologia em Computacao Grafica, PUC-Rio, Brazil
|
||||||
** e-mail: lua@tecgraf.puc-rio.br
|
** e-mail: lua@tecgraf.puc-rio.br
|
||||||
** $Id: lua.h,v 4.7 1997/06/12 18:27:29 roberto Exp roberto $
|
** $Id: lua.h,v 4.8 1997/06/16 19:48:18 roberto Exp roberto $
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
||||||
#ifndef lua_h
|
#ifndef lua_h
|
||||||
#define lua_h
|
#define lua_h
|
||||||
|
|
||||||
#define LUA_VERSION "Lua 3.0 (alpha)"
|
#define LUA_VERSION "Lua 3.0"
|
||||||
#define LUA_COPYRIGHT "Copyright (C) 1994-1997 TeCGraf"
|
#define LUA_COPYRIGHT "Copyright (C) 1994-1997 TeCGraf"
|
||||||
#define LUA_AUTHORS "W. Celes, R. Ierusalimschy & L. H. de Figueiredo"
|
#define LUA_AUTHORS "W. Celes, R. Ierusalimschy & L. H. de Figueiredo"
|
||||||
|
|
||||||
@@ -52,6 +52,8 @@ int lua_isfunction (lua_Object object);
|
|||||||
float lua_getnumber (lua_Object object);
|
float lua_getnumber (lua_Object object);
|
||||||
char *lua_getstring (lua_Object object);
|
char *lua_getstring (lua_Object object);
|
||||||
lua_CFunction lua_getcfunction (lua_Object object);
|
lua_CFunction lua_getcfunction (lua_Object object);
|
||||||
|
void *lua_getuserdata (lua_Object object);
|
||||||
|
|
||||||
|
|
||||||
void lua_pushnil (void);
|
void lua_pushnil (void);
|
||||||
void lua_pushnumber (float n);
|
void lua_pushnumber (float n);
|
||||||
@@ -98,6 +100,13 @@ long lua_collectgarbage (long limit);
|
|||||||
#define lua_pushuserdata(u) lua_pushusertag(u, 0)
|
#define lua_pushuserdata(u) lua_pushusertag(u, 0)
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/* If your program has no compatibility problems, you can change
|
||||||
|
** this to 0
|
||||||
|
*/
|
||||||
|
#if 1
|
||||||
|
|
||||||
/* =============================================================== */
|
/* =============================================================== */
|
||||||
/* for compatibility with old versions. Avoid using these macros/functions */
|
/* for compatibility with old versions. Avoid using these macros/functions */
|
||||||
|
|
||||||
@@ -106,8 +115,6 @@ lua_Object lua_setfallback (char *event, lua_CFunction fallback);
|
|||||||
#define lua_storeglobal lua_setglobal
|
#define lua_storeglobal lua_setglobal
|
||||||
#define lua_type lua_tag
|
#define lua_type lua_tag
|
||||||
|
|
||||||
void *lua_getuserdata (lua_Object object);
|
|
||||||
|
|
||||||
#define lua_lockobject(o) lua_refobject(o,1)
|
#define lua_lockobject(o) lua_refobject(o,1)
|
||||||
#define lua_lock() lua_ref(1)
|
#define lua_lock() lua_ref(1)
|
||||||
#define lua_getlocked lua_getref
|
#define lua_getlocked lua_getref
|
||||||
@@ -117,7 +124,7 @@ void *lua_getuserdata (lua_Object object);
|
|||||||
#define lua_pushliteral(o) lua_pushstring(o)
|
#define lua_pushliteral(o) lua_pushstring(o)
|
||||||
|
|
||||||
#define lua_getindexed(o,n) (lua_pushobject(o), lua_pushnumber(n), lua_gettable())
|
#define lua_getindexed(o,n) (lua_pushobject(o), lua_pushnumber(n), lua_gettable())
|
||||||
#define lua_getfield(o,f) (lua_pushobject(o), lua_pushliteral(f), lua_gettable())
|
#define lua_getfield(o,f) (lua_pushobject(o), lua_pushstring(f), lua_gettable())
|
||||||
|
|
||||||
#define lua_copystring(o) (strdup(lua_getstring(o)))
|
#define lua_copystring(o) (strdup(lua_getstring(o)))
|
||||||
|
|
||||||
@@ -125,3 +132,5 @@ void *lua_getuserdata (lua_Object object);
|
|||||||
#define lua_storesubscript lua_settable
|
#define lua_storesubscript lua_settable
|
||||||
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|||||||
Reference in New Issue
Block a user