gh-mirror/mikepaul-LuaJIT
1
0
Fork 0
mirror of https://github.com/LuaJIT/LuaJIT.git synced 2025-02-07 23:24:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix parsing of hex floats.

Browse Source
This commit is contained in:
Mike Pall 2010-11-01 17:53:04 +01:00
parent 7e5cb31e0b
commit 44372a4453
1 changed files with 20 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/lj_lex.c
View File

@ -46,16 +46,22 @@ static int fillbuf(LexState *ls)
return char2int(*(ls->p++));
}
static void save(LexState *ls, int c)
static LJ_NOINLINE void save_grow(LexState *ls, int c)
{
if (ls->sb.n + 1 > ls->sb.sz) {
MSize newsize;
if (ls->sb.sz >= LJ_MAX_STR/2)
lj_lex_error(ls, 0, LJ_ERR_XELEM);
newsize = ls->sb.sz * 2;
lj_str_resizebuf(ls->L, &ls->sb, newsize);
}
ls->sb.buf[ls->sb.n++] = cast(char, c);
ls->sb.buf[ls->sb.n++] = (char)c;
}
static LJ_AINLINE void save(LexState *ls, int c)
{
if (LJ_UNLIKELY(ls->sb.n + 1 > ls->sb.sz))
save_grow(ls, c);
else
ls->sb.buf[ls->sb.n++] = (char)c;
}
static void inclinenumber(LexState *ls)
@ -73,18 +79,14 @@ static void inclinenumber(LexState *ls)
static void read_numeral(LexState *ls, TValue *tv)
{
int c;
lua_assert(lj_ctype_isdigit(ls->current));
do {
c = ls->current;
save_and_next(ls);
} while (lj_ctype_isdigit(ls->current) || ls->current == '.');
if (ls->current == 'e' || ls->current == 'E' ||
ls->current == 'p' || ls->current == 'P') {
save_and_next(ls);
if (ls->current == '+' || ls->current == '-')
save_and_next(ls);
}
while (lj_ctype_isident(ls->current))
save_and_next(ls);
} while (lj_ctype_isident(ls->current) || ls->current == '.' ||
((ls->current == '-' || ls->current == '+') &&
((c & ~0x20) == 'E' || (c & ~0x20) == 'P')));
save(ls, '\0');
if (!lj_str_numconv(ls->sb.buf, tv))
lj_lex_error(ls, TK_number, LJ_ERR_XNUMBER);