diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-14 16:33:29 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-14 16:33:29 -0200 |
commit | 1b15206cf9aa7005fc3d48f78f60f66838f10eb5 (patch) | |
tree | 00a96c96d331417ba781b605c6c10d8daae01938 /llex.c | |
parent | e6d56cd2d844174bd40af4c44c0f68e2115e5876 (diff) | |
download | lua-1b15206cf9aa7005fc3d48f78f60f66838f10eb5.tar.gz lua-1b15206cf9aa7005fc3d48f78f60f66838f10eb5.tar.bz2 lua-1b15206cf9aa7005fc3d48f78f60f66838f10eb5.zip |
many details + code redistribution
Diffstat (limited to 'llex.c')
-rw-r--r-- | llex.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: llex.c,v 1.44 1999/11/22 13:12:07 roberto Exp roberto $ | 2 | ** $Id: llex.c,v 1.45 1999/12/02 16:41:29 roberto Exp roberto $ |
3 | ** Lexical Analyzer | 3 | ** Lexical Analyzer |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -64,7 +64,7 @@ void luaX_error (LexState *ls, const char *s) { | |||
64 | 64 | ||
65 | 65 | ||
66 | void luaX_token2str (int token, char *s) { | 66 | void luaX_token2str (int token, char *s) { |
67 | if (token < 255) { | 67 | if (token < 256) { |
68 | s[0] = (char)token; | 68 | s[0] = (char)token; |
69 | s[1] = '\0'; | 69 | s[1] = '\0'; |
70 | } | 70 | } |
@@ -225,7 +225,7 @@ static void inclinenumber (lua_State *L, LexState *LS) { | |||
225 | 225 | ||
226 | /* | 226 | /* |
227 | ** ======================================================= | 227 | ** ======================================================= |
228 | ** LEXICAL ANALIZER | 228 | ** LEXICAL ANALYZER |
229 | ** ======================================================= | 229 | ** ======================================================= |
230 | */ | 230 | */ |
231 | 231 | ||
@@ -407,7 +407,7 @@ int luaX_lex (LexState *LS) { | |||
407 | } | 407 | } |
408 | save(L, '\0'); | 408 | save(L, '\0'); |
409 | if (!luaO_str2d(L->Mbuffer+L->Mbuffbase, &LS->seminfo.r)) | 409 | if (!luaO_str2d(L->Mbuffer+L->Mbuffbase, &LS->seminfo.r)) |
410 | luaX_error(LS, "invalid numeric format"); | 410 | luaX_error(LS, "malformed number"); |
411 | return NUMBER; | 411 | return NUMBER; |
412 | 412 | ||
413 | case EOZ: | 413 | case EOZ: |