"read('s')" was "eating" delimiter.

This commit is contained in:
Roberto Ierusalimschy 1996-01-29 14:40:09 -02:00
parent 0d50b87aa4
commit 55a70c9719

View File

@ -3,7 +3,7 @@
** Input/output library to LUA
*/
char *rcs_iolib="$Id: iolib.c,v 1.31 1996/01/22 17:38:57 roberto Exp roberto $";
char *rcs_iolib="$Id: iolib.c,v 1.31 1996/01/22 17:46:55 roberto Exp roberto $";
#include <stdio.h>
#include <ctype.h>
@ -200,12 +200,12 @@ static int read_until_char (int del)
return c;
}
static int read_until_blank (void)
static void read_until_blank (void)
{
int c;
while((c = fgetc(in)) != EOF && !isspace(c))
luaI_addchar(c);
return c;
if (c != EOF) ungetc(c,in);
}
static void read_m (int m)