diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-01 17:50:08 -0200 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1999-12-01 17:50:08 -0200 |
commit | fe237ad8085f34e89fcd3610a9771215af63f03f (patch) | |
tree | f7ee5d8f7d1ffb74e94f049aa6f31eb03606cdf6 /lparser.c | |
parent | 3181dfefee40b9a424b80aa779c671f5f458904c (diff) | |
download | lua-fe237ad8085f34e89fcd3610a9771215af63f03f.tar.gz lua-fe237ad8085f34e89fcd3610a9771215af63f03f.tar.bz2 lua-fe237ad8085f34e89fcd3610a9771215af63f03f.zip |
fixed stack; first version.
Diffstat (limited to 'lparser.c')
-rw-r--r-- | lparser.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lparser.c,v 1.43 1999/11/22 13:12:07 roberto Exp roberto $ | 2 | ** $Id: lparser.c,v 1.44 1999/11/25 18:59:43 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 | */ |
@@ -581,8 +581,8 @@ static void init_state (LexState *ls, FuncState *fs, TaggedString *source) { | |||
581 | code_byte(ls, 0); /* to be filled with maxstacksize */ | 581 | code_byte(ls, 0); /* to be filled with maxstacksize */ |
582 | code_byte(ls, 0); /* to be filled with arg information */ | 582 | code_byte(ls, 0); /* to be filled with arg information */ |
583 | /* push function (to avoid GC) */ | 583 | /* push function (to avoid GC) */ |
584 | tfvalue(L->stack.top) = f; | 584 | tfvalue(L->top) = f; |
585 | ttype(L->stack.top) = LUA_T_PROTO; | 585 | ttype(L->top) = LUA_T_PROTO; |
586 | incr_top; | 586 | incr_top; |
587 | } | 587 | } |
588 | 588 | ||
@@ -599,7 +599,7 @@ static void close_func (LexState *ls) { | |||
599 | luaM_reallocvector(ls->L, f->locvars, fs->nvars, LocVar); | 599 | luaM_reallocvector(ls->L, f->locvars, fs->nvars, LocVar); |
600 | } | 600 | } |
601 | ls->fs = fs->prev; | 601 | ls->fs = fs->prev; |
602 | ls->L->stack.top--; /* pop function */ | 602 | ls->L->top--; /* pop function */ |
603 | } | 603 | } |
604 | 604 | ||
605 | 605 | ||