aboutsummaryrefslogtreecommitdiff
path: root/lstate.h
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-07-18 11:46:47 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-07-18 11:46:47 -0300
commitbb129031205acc64eb6b41c98d8a08c1fccce308 (patch)
tree65e01a5af21d2867c3108507ed0afbb8d32201bd /lstate.h
parentca41b43f53562e64abe433d6346d174c92548603 (diff)
downloadlua-bb129031205acc64eb6b41c98d8a08c1fccce308.tar.gz
lua-bb129031205acc64eb6b41c98d8a08c1fccce308.tar.bz2
lua-bb129031205acc64eb6b41c98d8a08c1fccce308.zip
type 'Udata' refers directly to structure inside the union (union
used only for aligning purposes now)
Diffstat (limited to 'lstate.h')
-rw-r--r--lstate.h7
1 files changed, 3 insertions, 4 deletions
diff --git a/lstate.h b/lstate.h
index 662e925a..6e411317 100644
--- a/lstate.h
+++ b/lstate.h
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lstate.h,v 2.111 2014/07/18 12:17:54 roberto Exp roberto $ 2** $Id: lstate.h,v 2.112 2014/07/18 13:36:14 roberto Exp roberto $
3** Global State 3** Global State
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -175,7 +175,7 @@ struct lua_State {
175union GCUnion { 175union GCUnion {
176 GCObject gc; /* common header */ 176 GCObject gc; /* common header */
177 struct TString ts; 177 struct TString ts;
178 union Udata u; 178 struct Udata u;
179 union Closure cl; 179 union Closure cl;
180 struct Table h; 180 struct Table h;
181 struct Proto p; 181 struct Proto p;
@@ -188,8 +188,7 @@ union GCUnion {
188/* macros to convert a GCObject into a specific value */ 188/* macros to convert a GCObject into a specific value */
189#define gco2ts(o) \ 189#define gco2ts(o) \
190 check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts)) 190 check_exp(novariant((o)->tt) == LUA_TSTRING, &((cast_u(o))->ts))
191#define rawgco2u(o) check_exp((o)->tt == LUA_TUSERDATA, &((cast_u(o))->u)) 191#define gco2u(o) check_exp((o)->tt == LUA_TUSERDATA, &((cast_u(o))->u))
192#define gco2u(o) (&rawgco2u(o)->uv)
193#define gco2lcl(o) check_exp((o)->tt == LUA_TLCL, &((cast_u(o))->cl.l)) 192#define gco2lcl(o) check_exp((o)->tt == LUA_TLCL, &((cast_u(o))->cl.l))
194#define gco2ccl(o) check_exp((o)->tt == LUA_TCCL, &((cast_u(o))->cl.c)) 193#define gco2ccl(o) check_exp((o)->tt == LUA_TCCL, &((cast_u(o))->cl.c))
195#define gco2cl(o) \ 194#define gco2cl(o) \