rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

new lua function "tag"

This commit is contained in:
Roberto Ierusalimschy 1997-04-01 14:31:42 -03:00
parent efaaf99c42
commit bb2e2bec18
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
inout.c
View File

@ -5,7 +5,7 @@
** Also provides some predefined lua functions. ** Also provides some predefined lua functions.
*/ */
char *rcs_inout="$Id: inout.c,v 2.49 1997/03/31 14:17:09 roberto Exp roberto $"; char *rcs_inout="$Id: inout.c,v 2.50 1997/03/31 20:59:09 roberto Exp roberto $";
#include <stdio.h> #include <stdio.h>
#include <string.h> #include <string.h>
@ -213,6 +213,11 @@ static void luaI_basicgetglobal (void)
lua_pushobject(lua_basicgetglobal(luaL_check_string(1, "basicgetglobal"))); lua_pushobject(lua_basicgetglobal(luaL_check_string(1, "basicgetglobal")));
} }
static void luatag (void)
{
lua_pushnumber(lua_tag(lua_getparam(1)));
}
#define MAXPARAMS 256 #define MAXPARAMS 256
static void luaI_call (void) static void luaI_call (void)
{ {
@ -315,6 +320,7 @@ static struct {
{"settag", luaIl_settag}, {"settag", luaIl_settag},
{"tonumber", lua_obj2number}, {"tonumber", lua_obj2number},
{"tostring", luaI_tostring}, {"tostring", luaI_tostring},
{"tag", luatag},
{"type", luaI_type} {"type", luaI_type}
}; };