这是《Lua程序设计》中的例子,做个简单记录。
#include <stdio.h>
#include <lua5.2/lua.h>
#include <lua5.2/lauxlib.h>
static void stackDump(lua_State *L){
int i;
int top = lua_gettop(L);
for(i = 1; i <= top; i++){
int t = lua_type(L, i);
switch(t){
case LUA_TSTRING:
printf("'%s'", lua_tostring(L, i));
break;
case LUA_TBOOLEAN:
printf(lua_toboolean(L, i) ? "true":"false");
break;
case LUA_TNUMBER:
printf("%g", lua_tonumber(L, i));
break;
default:
printf("%s", lua_typename(L, t));
break;
}
printf(" ");
}
printf("\n");
}
int main(void){
lua_State *L = luaL_newstate();
lua_pushboolean(L, 1);
lua_pushnumber(L, 10);
lua_pushnil(L);
lua_pushstring(L, "vonzhou");
stackDump(L); // dump the stack
lua_pushvalue(L, -4);// push the value of the index to the stack
stackDump(L);
lua_replace(L, 3); // pop a value and replace the index's
stackDump(L);
lua_settop(L, 6); // set the top index, fill 'nil'
stackDump(L);
lua_remove(L, -3); //
stackDump(L);
lua_settop(L, -5);
stackDump(L);
lua_close(L);
return 0;
}
运行结果:
简单画个示意图:
CentOS 编译安装 Lua LuaSocket