nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

avoid assignments to TObject access macros

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2002-06-17 10:51:01 -03:00
parent c31494df26
commit e812aa2002
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
lundump.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lundump.c,v 1.40 2002/03/01 01:48:42 lhf Exp lhf $ ** $Id: lundump.c,v 1.41 2002/06/06 13:22:56 lhf Exp lhf $
** load pre-compiled Lua chunks ** load pre-compiled Lua chunks
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -150,19 +150,20 @@ static void LoadConstants (lua_State* L, Proto* f, ZIO* Z, int swap)
for (i=0; i<n; i++) for (i=0; i<n; i++)
{ {
TObject* o=&f->k[i]; TObject* o=&f->k[i];
ttype(o)=LoadByte(L,Z); int t=LoadByte(L,Z);
switch (ttype(o)) switch (t)
{ {
case LUA_TNUMBER: case LUA_TNUMBER:
nvalue(o)=LoadNumber(L,Z,swap); setnvalue(o,LoadNumber(L,Z,swap));
break; break;
case LUA_TSTRING: case LUA_TSTRING:
tsvalue(o)=LoadString(L,Z,swap); setsvalue(o,LoadString(L,Z,swap));
break; break;
case LUA_TNIL: case LUA_TNIL:
setnilvalue(o);
break; break;
default: default:
luaG_runerror(L,"bad constant type (%d) in %s",ttype(o),ZNAME(Z)); luaG_runerror(L,"bad constant type (%d) in %s",t,ZNAME(Z));
break; break;
} }
} }