12 static int print(lua_State *L)  in print()  argument
14  int n=lua_gettop(L);  in print()
19   if (lua_isstring(L,i))  in print()
20    printf("%s",lua_tostring(L,i));  in print()
21   else if (lua_isnil(L,i))  in print()
23   else if (lua_isboolean(L,i))  in print()
24    printf("%s",lua_toboolean(L,i) ? "true" : "false");  in print()
26    printf("%s:%p",luaL_typename(L,i),lua_topointer(L,i));  in print()
34  lua_State *L=lua_open();  in main()  local
35  lua_register(L,"print",print);  in main()
36  if (luaL_dofile(L,NULL)!=0) fprintf(stderr,"%s\n",lua_tostring(L,-1));  in main()
37  lua_close(L);  in main()