当使用lua_call时，请用lua_atpanic为其设置panic函数

为何使用lua_atpanic
当调用无保护的lua_call后，如果调用栈发生错误(lua_error)，那么默认行为是直接退出宿主程序。（可以参考这篇文章)
要避免这样的情况，一种方法是定义自己的panic函数，并作为参数调用lua_atpanic；此外为了避免退出宿主程序，自定义的panic函数应该永不返回（通常是做一个长跳转，令其跳转至lua_call调用点，不过这种做法几乎与lua_pcall无异)
lua_atpanic 1. lua_atpanic设置新panic函数并返回旧的panic函数。
2. 当在无保护环境下发生错误，lua调用当前的panic函数并呼叫exit(EXIT_FAILURE)退出宿主程序。
3. 我们可以提供自己的panic函数以避免退出宿主程序。（一种方法是做一个长跳转(long jump)）
4. panic函数可以访问位于栈顶的错误讯息。
示例 #include <lua.h> #include <lauxlib.h> #include <lualib.h> #include <stdio.h> #include <setjmp.h> static jmp_buf jbuf; int panichandler(lua_State *L)     printf("%s\n",lua_tostring(L,1));     lua_pop(L,1);     longjmp(&jbuf,1);     } int  main(int argc,char *argv[]) lua_State *L; int        ret = 0; if ((L = lua_open()) == NULL) {     printf("lua_open() Failed!\n");     return 1; } luaL_openlibs(L); lua_atpanic(L,panichandler); if (luaL_loadfile(L,"main.lua") == 0) {           if (setjmp(&jbuf) == 0)   /* first jmp */           lua_call(L,0);             else                      /* second jmp,error */           ret = 1;      else        ret = 1; lua_close(L); return ret; }