`panic' function configurable via API

This commit is contained in:
Roberto Ierusalimschy
2002-04-16 14:08:28 -03:00
parent 13230c451b
commit c11d374c59
5 changed files with 29 additions and 7 deletions

11
lapi.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: lapi.c,v 1.182 2002/04/02 20:43:18 roberto Exp roberto $
** $Id: lapi.c,v 1.183 2002/04/05 18:54:31 roberto Exp roberto $
** Lua API
** See Copyright Notice in lua.h
*/
@@ -98,6 +98,15 @@ LUA_API int lua_checkstack (lua_State *L, int size) {
}
LUA_API lua_CFunction lua_setpanicf (lua_State *L, lua_CFunction panicf) {
lua_CFunction old;
lua_lock(L);
old = G(L)->panic;
G(L)->panic = panicf;
lua_unlock(L);
return old;
}
/*
** basic stack manipulation