BUG: files starting with '#' get wrong line numbers

This commit is contained in:
Roberto Ierusalimschy 1997-07-07 18:05:51 -03:00
parent 067db30d71
commit 66be42549e
1 changed files with 3 additions and 2 deletions

View File

@ -5,7 +5,7 @@
** Also provides some predefined lua functions. ** Also provides some predefined lua functions.
*/ */
char *rcs_inout="$Id: inout.c,v 2.68 1997/06/26 20:47:43 roberto Exp roberto $"; char *rcs_inout="$Id: inout.c,v 2.69 1997/06/27 22:38:49 roberto Exp roberto $";
#include <stdio.h> #include <stdio.h>
#include <string.h> #include <string.h>
@ -73,7 +73,8 @@ int lua_dofile (char *filename)
} }
else { else {
if (c == '#') if (c == '#')
while ((c=fgetc(f)) != '\n') /* skip first line */; while ((c=fgetc(f)) != '\n' && c != 0) /* skip first line */;
ungetc(c, f);
status = lua_doFILE(f, 0); status = lua_doFILE(f, 0);
} }
if (f != stdin) if (f != stdin)