mirror of https://github.com/rusefi/lua.git
BUG: files starting with '#' get wrong line numbers
This commit is contained in:
parent
067db30d71
commit
66be42549e
5
inout.c
5
inout.c
|
@ -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)
|
||||||
|
|
Loading…
Reference in New Issue