aboutsummaryrefslogtreecommitdiff
path: root/liolib.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-05-14 09:24:04 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-05-14 09:24:04 -0300
commit924bbe020bfb79a42a4756e36847dab7880d36b4 (patch)
treecccdb6837c1299683bfdcecd49bce1969a8568bd /liolib.c
parent3aa500b524793cf79de78c373a618d708bf22004 (diff)
downloadlua-924bbe020bfb79a42a4756e36847dab7880d36b4.tar.gz
lua-924bbe020bfb79a42a4756e36847dab7880d36b4.tar.bz2
lua-924bbe020bfb79a42a4756e36847dab7880d36b4.zip
bigger limits
Diffstat (limited to 'liolib.c')
-rw-r--r--liolib.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/liolib.c b/liolib.c
index f43c3fd0..63a698d1 100644
--- a/liolib.c
+++ b/liolib.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: liolib.c,v 1.38 1999/04/14 20:40:32 roberto Exp $ 2** $Id: liolib.c,v 1.39 1999/05/05 19:22:26 roberto Exp roberto $
3** Standard I/O (and system) library 3** Standard I/O (and system) library
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -477,7 +477,7 @@ static void io_debug (void) {
477#define MAXMESSAGE (MESSAGESIZE*10) 477#define MAXMESSAGE (MESSAGESIZE*10)
478 478
479 479
480#define MAXSRC 40 480#define MAXSRC 60
481 481
482 482
483static void errorfb (void) { 483static void errorfb (void) {
@@ -494,7 +494,7 @@ static void errorfb (void) {
494 lua_funcinfo(func, &chunkname, &linedefined); 494 lua_funcinfo(func, &chunkname, &linedefined);
495 luaL_chunkid(buffchunk, chunkname, sizeof(buffchunk)); 495 luaL_chunkid(buffchunk, chunkname, sizeof(buffchunk));
496 if (level == 2) strcat(buff, "Active Stack:\n"); 496 if (level == 2) strcat(buff, "Active Stack:\n");
497 strcat(buff, "\t"); 497 strcat(buff, " ");
498 if (strlen(buff) > MAXMESSAGE-MESSAGESIZE) { 498 if (strlen(buff) > MAXMESSAGE-MESSAGESIZE) {
499 strcat(buff, "...\n"); 499 strcat(buff, "...\n");
500 break; /* buffer is full */ 500 break; /* buffer is full */
@@ -508,11 +508,11 @@ static void errorfb (void) {
508 break; 508 break;
509 default: { 509 default: {
510 if (linedefined == 0) 510 if (linedefined == 0)
511 sprintf(buff+strlen(buff), "main of %.50s", buffchunk); 511 sprintf(buff+strlen(buff), "main of %.70s", buffchunk);
512 else if (linedefined < 0) 512 else if (linedefined < 0)
513 sprintf(buff+strlen(buff), "%.50s", buffchunk); 513 sprintf(buff+strlen(buff), "%.70s", buffchunk);
514 else 514 else
515 sprintf(buff+strlen(buff), "function <%d:%.50s>", 515 sprintf(buff+strlen(buff), "function <%d:%.70s>",
516 linedefined, buffchunk); 516 linedefined, buffchunk);
517 chunkname = NULL; 517 chunkname = NULL;
518 } 518 }
@@ -520,7 +520,7 @@ static void errorfb (void) {
520 if ((currentline = lua_currentline(func)) > 0) 520 if ((currentline = lua_currentline(func)) > 0)
521 sprintf(buff+strlen(buff), " at line %d", currentline); 521 sprintf(buff+strlen(buff), " at line %d", currentline);
522 if (chunkname) 522 if (chunkname)
523 sprintf(buff+strlen(buff), " [%.50s]", buffchunk); 523 sprintf(buff+strlen(buff), " [%.70s]", buffchunk);
524 strcat(buff, "\n"); 524 strcat(buff, "\n");
525 } 525 }
526 func = lua_rawgetglobal("_ALERT"); 526 func = lua_rawgetglobal("_ALERT");