diff options
| -rw-r--r-- | lcode.c | 4 | ||||
| -rw-r--r-- | lparser.c | 8 |
2 files changed, 6 insertions, 6 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lcode.c,v 1.59 2001/01/29 15:26:40 roberto Exp roberto $ | 2 | ** $Id: lcode.c,v 1.60 2001/02/07 18:13:49 roberto Exp roberto $ |
| 3 | ** Code generator for Lua | 3 | ** Code generator for Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -100,7 +100,7 @@ void luaK_deltastack (FuncState *fs, int delta) { | |||
| 100 | if (fs->stacklevel > fs->f->maxstacksize) { | 100 | if (fs->stacklevel > fs->f->maxstacksize) { |
| 101 | if (fs->stacklevel > MAXSTACK) | 101 | if (fs->stacklevel > MAXSTACK) |
| 102 | luaK_error(fs->ls, "function or expression too complex"); | 102 | luaK_error(fs->ls, "function or expression too complex"); |
| 103 | fs->f->maxstacksize = fs->stacklevel; | 103 | fs->f->maxstacksize = (short)fs->stacklevel; |
| 104 | } | 104 | } |
| 105 | } | 105 | } |
| 106 | 106 | ||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lparser.c,v 1.128 2001/01/31 13:13:17 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 1.129 2001/02/05 17:48:52 roberto Exp roberto $ |
| 3 | ** LL(1) Parser and code generator for Lua | 3 | ** LL(1) Parser and code generator for Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -261,11 +261,11 @@ static void adjust_mult_assign (LexState *ls, int nvars, int nexps) { | |||
| 261 | } | 261 | } |
| 262 | 262 | ||
| 263 | 263 | ||
| 264 | static void code_params (LexState *ls, int nparams, int dots) { | 264 | static void code_params (LexState *ls, int nparams, short dots) { |
| 265 | FuncState *fs = ls->fs; | 265 | FuncState *fs = ls->fs; |
| 266 | adjustlocalvars(ls, nparams); | 266 | adjustlocalvars(ls, nparams); |
| 267 | luaX_checklimit(ls, fs->nactloc, MAXPARAMS, "parameters"); | 267 | luaX_checklimit(ls, fs->nactloc, MAXPARAMS, "parameters"); |
| 268 | fs->f->numparams = fs->nactloc; /* `self' could be there already */ | 268 | fs->f->numparams = (short)fs->nactloc; /* `self' could be there already */ |
| 269 | fs->f->is_vararg = dots; | 269 | fs->f->is_vararg = dots; |
| 270 | if (dots) { | 270 | if (dots) { |
| 271 | new_localvarstr(ls, "arg", 0); | 271 | new_localvarstr(ls, "arg", 0); |
| @@ -1093,7 +1093,7 @@ static int stat (LexState *ls) { | |||
| 1093 | static void parlist (LexState *ls) { | 1093 | static void parlist (LexState *ls) { |
| 1094 | /* parlist -> [ param { ',' param } ] */ | 1094 | /* parlist -> [ param { ',' param } ] */ |
| 1095 | int nparams = 0; | 1095 | int nparams = 0; |
| 1096 | int dots = 0; | 1096 | short dots = 0; |
| 1097 | if (ls->t.token != ')') { /* is `parlist' not empty? */ | 1097 | if (ls->t.token != ')') { /* is `parlist' not empty? */ |
| 1098 | do { | 1098 | do { |
| 1099 | switch (ls->t.token) { | 1099 | switch (ls->t.token) { |
