diff options
Diffstat (limited to 'lparser.c')
| -rw-r--r-- | lparser.c | 14 |
1 files changed, 1 insertions, 13 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lparser.c,v 1.209 2003/05/13 20:15:59 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 1.210 2003/05/14 12:32:46 roberto Exp roberto $ |
| 3 | ** Lua Parser | 3 | ** Lua Parser |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -651,18 +651,6 @@ static void prefixexp (LexState *ls, expdesc *v) { | |||
| 651 | singlevar(ls, v, 1); | 651 | singlevar(ls, v, 1); |
| 652 | return; | 652 | return; |
| 653 | } | 653 | } |
| 654 | #ifdef LUA_COMPATUPSYNTAX | ||
| 655 | case '%': { /* for compatibility only */ | ||
| 656 | TString *varname; | ||
| 657 | int line = ls->linenumber; | ||
| 658 | next(ls); /* skip `%' */ | ||
| 659 | varname = singlevar(ls, v, 1); | ||
| 660 | if (v->k != VUPVAL) | ||
| 661 | luaX_errorline(ls, "global upvalues are obsolete", | ||
| 662 | getstr(varname), line); | ||
| 663 | return; | ||
| 664 | } | ||
| 665 | #endif | ||
| 666 | default: { | 654 | default: { |
| 667 | luaX_syntaxerror(ls, "unexpected symbol"); | 655 | luaX_syntaxerror(ls, "unexpected symbol"); |
| 668 | return; | 656 | return; |
