diff options
Diffstat (limited to 'iolib.c')
-rw-r--r-- | iolib.c | 9 |
1 files changed, 5 insertions, 4 deletions
@@ -3,7 +3,7 @@ | |||
3 | ** Input/output library to LUA | 3 | ** Input/output library to LUA |
4 | */ | 4 | */ |
5 | 5 | ||
6 | char *rcs_iolib="$Id: iolib.c,v 1.23 1995/10/11 20:50:56 roberto Exp roberto $"; | 6 | char *rcs_iolib="$Id: iolib.c,v 1.24 1995/10/17 14:12:45 roberto Exp roberto $"; |
7 | 7 | ||
8 | #include <stdio.h> | 8 | #include <stdio.h> |
9 | #include <ctype.h> | 9 | #include <ctype.h> |
@@ -617,14 +617,15 @@ static void print_message (void) | |||
617 | lua_funcinfo(func, &filename, &funcname, &objname, &linedefined); | 617 | lua_funcinfo(func, &filename, &funcname, &objname, &linedefined); |
618 | if (objname == NULL) | 618 | if (objname == NULL) |
619 | if (funcname) | 619 | if (funcname) |
620 | fprintf(stderr, "\t%s\n", funcname); | 620 | fprintf(stderr, "\t%s", funcname); |
621 | else | 621 | else |
622 | { | 622 | { |
623 | fprintf(stderr, "\tmain of %s\n", filename); | 623 | fprintf(stderr, "\tmain of %s\n", filename); |
624 | continue; | ||
624 | } | 625 | } |
625 | else | 626 | else |
626 | fprintf(stderr, "\t%s:%s\n", objname, funcname); | 627 | fprintf(stderr, "\t%s:%s", objname, funcname); |
627 | /* fprintf(stderr, "\t(in file: %s)\n", filename); */ | 628 | fprintf(stderr, "\t(defined in %s)\n", filename); |
628 | } | 629 | } |
629 | } | 630 | } |
630 | 631 | ||