mirror of
https://github.com/lua/lua
synced 2026-09-29 04:35:58 +03:00
new lua function "getstack"; new interface to function luaI_reportbug.
This commit is contained in:
parent
18ea2eff80
commit
ec79f25286
4 changed files with 30 additions and 16 deletions
8
opcode.c
8
opcode.c
|
|
@ -3,7 +3,7 @@
|
|||
** TecCGraf - PUC-Rio
|
||||
*/
|
||||
|
||||
char *rcs_opcode="$Id: opcode.c,v 3.36 1995/04/11 17:56:30 celes Exp roberto $";
|
||||
char *rcs_opcode="$Id: opcode.c,v 3.37 1995/05/02 18:43:03 roberto Exp roberto $";
|
||||
|
||||
#include <setjmp.h>
|
||||
#include <stdlib.h>
|
||||
|
|
@ -68,14 +68,10 @@ Object *luaI_Address (lua_Object o)
|
|||
** Error messages
|
||||
*/
|
||||
|
||||
#define MAXMESSAGE MAXFUNCSTACK*80
|
||||
|
||||
static void lua_message (char *s)
|
||||
{
|
||||
char msg[MAXMESSAGE];
|
||||
strcpy (msg, s);
|
||||
luaI_reportbug(msg, MAXMESSAGE-strlen(s));
|
||||
lua_pushstring(msg);
|
||||
luaI_reportbug(s, 1);
|
||||
do_call(&luaI_fallBacks[FB_ERROR].function, (top-stack)-1, 0, (top-stack)-1);
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue