如何在Lua5.1.4中实现这样的效果

linux_c_py_php

正是这个意思。

starwing83 发表于 2013-01-25 17:06
回复 6# linux_c_py_php

converse

1. #include <stdio.h>
   
2.     #include "lua.h"
   
3.     #include "lualib.h"
   
4.     #include "lauxlib.h"
   
5. 
   
6.     static int panic(lua_State *state) {
   
7.       printf("PANIC: unprotected error in call to Lua API (%s)\n",
   
8.               lua_tostring(state, -1));
   
9.       return 0;
   
10.     }
    
11. 
    
12.     static int test(lua_State *state) {
    
13.       printf("in test\n");
    
14.       printf("yielding\n");
    
15.       return lua_yield(state, 0);
    
16.     }
    
17. 
    
18.     int main(int argc, char *argv[]) {
    
19.       char *name = NULL;
    
20.       name = "co.lua";
    
21.       lua_State*  L1 = NULL;
    
22.       L1 = lua_open();
    
23.       lua_atpanic(L1, panic);
    
24.       luaL_openlibs( L1 );
    
25. 
    
26.       lua_register(L1, "test", test);
    
27.       lua_State*  L = lua_newthread(L1);
    
28. 
    
29.       luaL_loadfile(L, name);
    
30.       lua_resume(L, 0);
    
31.       printf("sleeping\n");
    
32.       sleep(1);
    
33.       lua_resume(L, 0);
    
34.       printf("after resume test\n");
    
35. 
    
36.       return 0;
    
37.     }

复制代码

搞定.