diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-12-09 11:50:08 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-12-09 11:50:08 -0200 |
| commit | 80b3d28f4a9e518bf40b35f786199919180bfcd4 (patch) | |
| tree | e25a410ba61883244207e25b16a853991b417ebb /llex.c | |
| parent | 69d97712ecfcd06aa4edb7374b262131210d0bbc (diff) | |
| download | lua-80b3d28f4a9e518bf40b35f786199919180bfcd4.tar.gz lua-80b3d28f4a9e518bf40b35f786199919180bfcd4.tar.bz2 lua-80b3d28f4a9e518bf40b35f786199919180bfcd4.zip | |
details (mainly error messages)
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.8 1997/11/21 19:00:46 roberto Exp roberto $ | 2 | ** $Id: llex.c,v 1.9 1997/12/02 12:43:54 roberto Exp roberto $ |
| 3 | ** Lexical Analizer | 3 | ** Lexical Analizer |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -166,7 +166,7 @@ static void inclinenumber (LexState *LS) | |||
| 166 | /* go through */ | 166 | /* go through */ |
| 167 | case 5: /* if */ | 167 | case 5: /* if */ |
| 168 | if (LS->iflevel == MAX_IFS-1) | 168 | if (LS->iflevel == MAX_IFS-1) |
| 169 | luaY_syntaxerror("too many nested `$ifs'", "$if"); | 169 | luaY_syntaxerror("too many nested $ifs", "$if"); |
| 170 | readname(LS, buff); | 170 | readname(LS, buff); |
| 171 | LS->iflevel++; | 171 | LS->iflevel++; |
| 172 | LS->ifstate[LS->iflevel].elsepart = 0; | 172 | LS->ifstate[LS->iflevel].elsepart = 0; |
| @@ -181,7 +181,7 @@ static void inclinenumber (LexState *LS) | |||
| 181 | LS->ifstate[LS->iflevel].condition; | 181 | LS->ifstate[LS->iflevel].condition; |
| 182 | break; | 182 | break; |
| 183 | default: | 183 | default: |
| 184 | luaY_syntaxerror("invalid pragma", buff); | 184 | luaY_syntaxerror("unknown pragma", buff); |
| 185 | } | 185 | } |
| 186 | skipspace(LS); | 186 | skipspace(LS); |
| 187 | if (LS->current == '\n') /* pragma must end with a '\n' ... */ | 187 | if (LS->current == '\n') /* pragma must end with a '\n' ... */ |
| @@ -414,7 +414,7 @@ int luaY_lex (YYSTYPE *l) | |||
| 414 | case EOZ: | 414 | case EOZ: |
| 415 | save(LS, 0); | 415 | save(LS, 0); |
| 416 | if (LS->iflevel > 0) | 416 | if (LS->iflevel > 0) |
| 417 | luaY_error("missing $endif"); | 417 | luaY_syntaxerror("input ends inside a $if", ""); |
| 418 | return 0; | 418 | return 0; |
| 419 | 419 | ||
| 420 | default: | 420 | default: |
