diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1994-11-17 19:23:43 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1994-11-17 19:23:43 -0200 |
commit | 1929ddcf49b948ed8082cd375f7f7bf0b8a15bee (patch) | |
tree | 9578d04056107bea60dee410d3889d7745d8764d /lua.h | |
parent | aa4cd37adfdeb84b8137d3fccdb28a49a3b6d9e5 (diff) | |
download | lua-1929ddcf49b948ed8082cd375f7f7bf0b8a15bee.tar.gz lua-1929ddcf49b948ed8082cd375f7f7bf0b8a15bee.tar.bz2 lua-1929ddcf49b948ed8082cd375f7f7bf0b8a15bee.zip |
userdata can have different tags
Diffstat (limited to 'lua.h')
-rw-r--r-- | lua.h | 21 |
1 files changed, 11 insertions, 10 deletions
@@ -2,7 +2,7 @@ | |||
2 | ** LUA - Linguagem para Usuarios de Aplicacao | 2 | ** LUA - Linguagem para Usuarios de Aplicacao |
3 | ** Grupo de Tecnologia em Computacao Grafica | 3 | ** Grupo de Tecnologia em Computacao Grafica |
4 | ** TeCGraf - PUC-Rio | 4 | ** TeCGraf - PUC-Rio |
5 | ** $Id: lua.h,v 3.7 1994/11/13 16:17:04 roberto Exp $ | 5 | ** $Id: lua.h,v 3.8 1994/11/17 16:41:42 roberto Exp roberto $ |
6 | */ | 6 | */ |
7 | 7 | ||
8 | 8 | ||
@@ -13,14 +13,13 @@ | |||
13 | 13 | ||
14 | typedef enum | 14 | typedef enum |
15 | { | 15 | { |
16 | LUA_T_MARK, | 16 | LUA_T_NIL = -1, |
17 | LUA_T_NIL, | 17 | LUA_T_NUMBER = -2, |
18 | LUA_T_NUMBER, | 18 | LUA_T_STRING = -3, |
19 | LUA_T_STRING, | 19 | LUA_T_ARRAY = -4, |
20 | LUA_T_ARRAY, | 20 | LUA_T_FUNCTION = -5, |
21 | LUA_T_FUNCTION, | 21 | LUA_T_CFUNCTION= -6, |
22 | LUA_T_CFUNCTION, | 22 | LUA_T_USERDATA = 0 |
23 | LUA_T_USERDATA | ||
24 | } lua_Type; | 23 | } lua_Type; |
25 | 24 | ||
26 | 25 | ||
@@ -53,7 +52,7 @@ int lua_pushnil (void); | |||
53 | int lua_pushnumber (float n); | 52 | int lua_pushnumber (float n); |
54 | int lua_pushstring (char *s); | 53 | int lua_pushstring (char *s); |
55 | int lua_pushcfunction (lua_CFunction fn); | 54 | int lua_pushcfunction (lua_CFunction fn); |
56 | int lua_pushuserdata (void *u); | 55 | int lua_pushusertag (void *u, int tag); |
57 | int lua_pushobject (lua_Object object); | 56 | int lua_pushobject (lua_Object object); |
58 | 57 | ||
59 | lua_Object lua_getglobal (char *name); | 58 | lua_Object lua_getglobal (char *name); |
@@ -77,6 +76,8 @@ lua_Object lua_createTable (int initSize); | |||
77 | #define lua_getindexed(o,n) (lua_pushobject(o), lua_pushnumber(n), lua_getsubscript()) | 76 | #define lua_getindexed(o,n) (lua_pushobject(o), lua_pushnumber(n), lua_getsubscript()) |
78 | #define lua_getfield(o,f) (lua_pushobject(o), lua_pushstring(f), lua_getsubscript()) | 77 | #define lua_getfield(o,f) (lua_pushobject(o), lua_pushstring(f), lua_getsubscript()) |
79 | 78 | ||
79 | #define lua_pushuserdata(u) lua_pushusertag(u,LUA_USERDATA) | ||
80 | |||
80 | #define lua_isnil(_) (lua_type(_)==LUA_T_NIL) | 81 | #define lua_isnil(_) (lua_type(_)==LUA_T_NIL) |
81 | #define lua_isnumber(_) (lua_type(_)==LUA_T_NUMBER) | 82 | #define lua_isnumber(_) (lua_type(_)==LUA_T_NUMBER) |
82 | #define lua_isstring(_) (lua_type(_)==LUA_T_STRING) | 83 | #define lua_isstring(_) (lua_type(_)==LUA_T_STRING) |