 |
Ardour
9.0-pre0-1950-g391fe97693
|
|
Ardour
9.0-pre0-1950-g391fe97693
|
Go to the source code of this file.
Classes | |
| struct | GCObject |
| union | Value |
| struct | lua_TValue |
| struct | TString |
| union | UTString |
| struct | Udata |
| union | UUdata |
| struct | Upvaldesc |
| struct | LocVar |
| struct | Proto |
| struct | CClosure |
| struct | LClosure |
| union | Closure |
| union | TKey |
| struct | Node |
| struct | Table |
Macros | |
| #define | LUA_TPROTO LUA_NUMTAGS /* function prototypes */ |
| #define | LUA_TDEADKEY (LUA_NUMTAGS+1) /* removed keys in tables */ |
| #define | LUA_TOTALTAGS (LUA_TPROTO + 2) |
| #define | LUA_TLCL (LUA_TFUNCTION | (0 << 4)) /* Lua closure */ |
| #define | LUA_TLCF (LUA_TFUNCTION | (1 << 4)) /* light C function */ |
| #define | LUA_TCCL (LUA_TFUNCTION | (2 << 4)) /* C closure */ |
| #define | LUA_TSHRSTR (LUA_TSTRING | (0 << 4)) /* short strings */ |
| #define | LUA_TLNGSTR (LUA_TSTRING | (1 << 4)) /* long strings */ |
| #define | LUA_TNUMFLT (LUA_TNUMBER | (0 << 4)) /* float numbers */ |
| #define | LUA_TNUMINT (LUA_TNUMBER | (1 << 4)) /* integer numbers */ |
| #define | BIT_ISCOLLECTABLE (1 << 6) |
| #define | ctb(t) ((t) | BIT_ISCOLLECTABLE) |
| #define | CommonHeader GCObject *next; lu_byte tt; lu_byte marked |
| #define | TValuefields Value value_; int tt_ |
| #define | NILCONSTANT {NULL}, LUA_TNIL |
| #define | val_(o) ((o)->value_) |
| #define | rttype(o) ((o)->tt_) |
| #define | novariant(x) ((x) & 0x0F) |
| #define | ttype(o) (rttype(o) & 0x3F) |
| #define | ttnov(o) (novariant(rttype(o))) |
| #define | checktag(o, t) (rttype(o) == (t)) |
| #define | checktype(o, t) (ttnov(o) == (t)) |
| #define | ttisnumber(o) checktype((o), LUA_TNUMBER) |
| #define | ttisfloat(o) checktag((o), LUA_TNUMFLT) |
| #define | ttisinteger(o) checktag((o), LUA_TNUMINT) |
| #define | ttisnil(o) checktag((o), LUA_TNIL) |
| #define | ttisboolean(o) checktag((o), LUA_TBOOLEAN) |
| #define | ttislightuserdata(o) checktag((o), LUA_TLIGHTUSERDATA) |
| #define | ttisstring(o) checktype((o), LUA_TSTRING) |
| #define | ttisshrstring(o) checktag((o), ctb(LUA_TSHRSTR)) |
| #define | ttislngstring(o) checktag((o), ctb(LUA_TLNGSTR)) |
| #define | ttistable(o) checktag((o), ctb(LUA_TTABLE)) |
| #define | ttisfunction(o) checktype(o, LUA_TFUNCTION) |
| #define | ttisclosure(o) ((rttype(o) & 0x1F) == LUA_TFUNCTION) |
| #define | ttisCclosure(o) checktag((o), ctb(LUA_TCCL)) |
| #define | ttisLclosure(o) checktag((o), ctb(LUA_TLCL)) |
| #define | ttislcf(o) checktag((o), LUA_TLCF) |
| #define | ttisfulluserdata(o) checktag((o), ctb(LUA_TUSERDATA)) |
| #define | ttisthread(o) checktag((o), ctb(LUA_TTHREAD)) |
| #define | ttisdeadkey(o) checktag((o), LUA_TDEADKEY) |
| #define | ivalue(o) check_exp(ttisinteger(o), val_(o).i) |
| #define | fltvalue(o) check_exp(ttisfloat(o), val_(o).n) |
| #define | nvalue(o) |
| #define | gcvalue(o) check_exp(iscollectable(o), val_(o).gc) |
| #define | pvalue(o) check_exp(ttislightuserdata(o), val_(o).p) |
| #define | tsvalue(o) check_exp(ttisstring(o), gco2ts(val_(o).gc)) |
| #define | uvalue(o) check_exp(ttisfulluserdata(o), gco2u(val_(o).gc)) |
| #define | clvalue(o) check_exp(ttisclosure(o), gco2cl(val_(o).gc)) |
| #define | clLvalue(o) check_exp(ttisLclosure(o), gco2lcl(val_(o).gc)) |
| #define | clCvalue(o) check_exp(ttisCclosure(o), gco2ccl(val_(o).gc)) |
| #define | fvalue(o) check_exp(ttislcf(o), val_(o).f) |
| #define | hvalue(o) check_exp(ttistable(o), gco2t(val_(o).gc)) |
| #define | bvalue(o) check_exp(ttisboolean(o), val_(o).b) |
| #define | thvalue(o) check_exp(ttisthread(o), gco2th(val_(o).gc)) |
| #define | deadvalue(o) check_exp(ttisdeadkey(o), cast(void *, val_(o).gc)) |
| #define | l_isfalse(o) (ttisnil(o) || (ttisboolean(o) && bvalue(o) == 0)) |
| #define | iscollectable(o) (rttype(o) & BIT_ISCOLLECTABLE) |
| #define | righttt(obj) (ttype(obj) == gcvalue(obj)->tt) |
| #define | checkliveness(L, obj) |
| #define | settt_(o, t) ((o)->tt_=(t)) |
| #define | setfltvalue(obj, x) { TValue *io=(obj); val_(io).n=(x); settt_(io, LUA_TNUMFLT); } |
| #define | chgfltvalue(obj, x) { TValue *io=(obj); lua_assert(ttisfloat(io)); val_(io).n=(x); } |
| #define | setivalue(obj, x) { TValue *io=(obj); val_(io).i=(x); settt_(io, LUA_TNUMINT); } |
| #define | chgivalue(obj, x) { TValue *io=(obj); lua_assert(ttisinteger(io)); val_(io).i=(x); } |
| #define | setnilvalue(obj) settt_(obj, LUA_TNIL) |
| #define | setfvalue(obj, x) { TValue *io=(obj); val_(io).f=(x); settt_(io, LUA_TLCF); } |
| #define | setpvalue(obj, x) { TValue *io=(obj); val_(io).p=(x); settt_(io, LUA_TLIGHTUSERDATA); } |
| #define | setbvalue(obj, x) { TValue *io=(obj); val_(io).b=(x); settt_(io, LUA_TBOOLEAN); } |
| #define | setgcovalue(L, obj, x) |
| #define | setsvalue(L, obj, x) |
| #define | setuvalue(L, obj, x) |
| #define | setthvalue(L, obj, x) |
| #define | setclLvalue(L, obj, x) |
| #define | setclCvalue(L, obj, x) |
| #define | sethvalue(L, obj, x) |
| #define | setdeadvalue(obj) settt_(obj, LUA_TDEADKEY) |
| #define | setobj(L, obj1, obj2) |
| #define | setobjs2s setobj |
| #define | setobj2s setobj |
| #define | setsvalue2s setsvalue |
| #define | sethvalue2s sethvalue |
| #define | setptvalue2s setptvalue |
| #define | setobjt2t setobj |
| #define | setobj2n setobj |
| #define | setsvalue2n setsvalue |
| #define | setobj2t(L, o1, o2) ((void)L, *(o1)=*(o2), checkliveness(L,(o1))) |
| #define | getstr(ts) check_exp(sizeof((ts)->extra), cast(char *, (ts)) + sizeof(UTString)) |
| #define | svalue(o) getstr(tsvalue(o)) |
| #define | tsslen(s) ((s)->tt == LUA_TSHRSTR ? (s)->shrlen : (s)->u.lnglen) |
| #define | vslen(o) tsslen(tsvalue(o)) |
| #define | getudatamem(u) check_exp(sizeof((u)->ttuv_), (cast(char*, (u)) + sizeof(UUdata))) |
| #define | setuservalue(L, u, o) |
| #define | getuservalue(L, u, o) |
| #define | ClosureHeader CommonHeader; lu_byte nupvalues; GCObject *gclist |
| #define | isLfunction(o) ttisLclosure(o) |
| #define | getproto(o) (clLvalue(o)->p) |
| #define | setnodekey(L, key, obj) |
| #define | lmod(s, size) (check_exp((size&(size-1))==0, (cast(int, (s) & ((size)-1))))) |
| #define | twoto(x) (1<<(x)) |
| #define | sizenode(t) (twoto((t)->lsizenode)) |
| #define | luaO_nilobject (&luaO_nilobject_) |
| #define | UTF8BUFFSZ 8 |
Typedefs | |
| typedef struct GCObject | GCObject |
| typedef union Value | Value |
| typedef struct lua_TValue | TValue |
| typedef TValue * | StkId |
| typedef struct TString | TString |
| typedef union UTString | UTString |
| typedef struct Udata | Udata |
| typedef union UUdata | UUdata |
| typedef struct Upvaldesc | Upvaldesc |
| typedef struct LocVar | LocVar |
| typedef struct Proto | Proto |
| typedef struct UpVal | UpVal |
| typedef struct CClosure | CClosure |
| typedef struct LClosure | LClosure |
| typedef union Closure | Closure |
| typedef union TKey | TKey |
| typedef struct Node | Node |
| typedef struct Table | Table |
Functions | |
| int | luaO_int2fb (unsigned int x) |
| int | luaO_fb2int (int x) |
| int | luaO_utf8esc (char *buff, unsigned long x) |
| int | luaO_ceillog2 (unsigned int x) |
| void | luaO_arith (lua_State *L, int op, const TValue *p1, const TValue *p2, TValue *res) |
| size_t | luaO_str2num (const char *s, TValue *o) |
| int | luaO_hexavalue (int c) |
| void | luaO_tostring (lua_State *L, StkId obj) |
| const char * | luaO_pushvfstring (lua_State *L, const char *fmt, va_list argp) |
| const char * | luaO_pushfstring (lua_State *L, const char *fmt,...) |
| void | luaO_chunkid (char *out, const char *source, size_t len) |
Variables | |
| const TValue | luaO_nilobject_ |
| #define bvalue | ( | o | ) | check_exp(ttisboolean(o), val_(o).b) |
| #define checkliveness | ( | L, | |
| obj | |||
| ) |
| #define chgfltvalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); lua_assert(ttisfloat(io)); val_(io).n=(x); } |
| #define chgivalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); lua_assert(ttisinteger(io)); val_(io).i=(x); } |
| #define clCvalue | ( | o | ) | check_exp(ttisCclosure(o), gco2ccl(val_(o).gc)) |
| #define clLvalue | ( | o | ) | check_exp(ttisLclosure(o), gco2lcl(val_(o).gc)) |
| #define ClosureHeader CommonHeader; lu_byte nupvalues; GCObject *gclist |
| #define clvalue | ( | o | ) | check_exp(ttisclosure(o), gco2cl(val_(o).gc)) |
| #define ctb | ( | t | ) | ((t) | BIT_ISCOLLECTABLE) |
| #define deadvalue | ( | o | ) | check_exp(ttisdeadkey(o), cast(void *, val_(o).gc)) |
| #define gcvalue | ( | o | ) | check_exp(iscollectable(o), val_(o).gc) |
| #define getuservalue | ( | L, | |
| u, | |||
| o | |||
| ) |
| #define iscollectable | ( | o | ) | (rttype(o) & BIT_ISCOLLECTABLE) |
| #define isLfunction | ( | o | ) | ttisLclosure(o) |
| #define ivalue | ( | o | ) | check_exp(ttisinteger(o), val_(o).i) |
| #define l_isfalse | ( | o | ) | (ttisnil(o) || (ttisboolean(o) && bvalue(o) == 0)) |
| #define LUA_TCCL (LUA_TFUNCTION | (2 << 4)) /* C closure */ |
| #define LUA_TDEADKEY (LUA_NUMTAGS+1) /* removed keys in tables */ |
| #define LUA_TLCF (LUA_TFUNCTION | (1 << 4)) /* light C function */ |
| #define LUA_TLCL (LUA_TFUNCTION | (0 << 4)) /* Lua closure */ |
| #define LUA_TLNGSTR (LUA_TSTRING | (1 << 4)) /* long strings */ |
| #define LUA_TNUMFLT (LUA_TNUMBER | (0 << 4)) /* float numbers */ |
| #define LUA_TNUMINT (LUA_TNUMBER | (1 << 4)) /* integer numbers */ |
| #define LUA_TOTALTAGS (LUA_TPROTO + 2) |
| #define LUA_TPROTO LUA_NUMTAGS /* function prototypes */ |
| #define LUA_TSHRSTR (LUA_TSTRING | (0 << 4)) /* short strings */ |
| #define luaO_nilobject (&luaO_nilobject_) |
| #define nvalue | ( | o | ) |
| #define pvalue | ( | o | ) | check_exp(ttislightuserdata(o), val_(o).p) |
| #define setbvalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); val_(io).b=(x); settt_(io, LUA_TBOOLEAN); } |
| #define setclCvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define setclLvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define setdeadvalue | ( | obj | ) | settt_(obj, LUA_TDEADKEY) |
| #define setfltvalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); val_(io).n=(x); settt_(io, LUA_TNUMFLT); } |
| #define setgcovalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define sethvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define setivalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); val_(io).i=(x); settt_(io, LUA_TNUMINT); } |
| #define setnodekey | ( | L, | |
| key, | |||
| obj | |||
| ) |
| #define setobj | ( | L, | |
| obj1, | |||
| obj2 | |||
| ) |
| #define setobj2t | ( | L, | |
| o1, | |||
| o2 | |||
| ) | ((void)L, *(o1)=*(o2), checkliveness(L,(o1))) |
| #define setpvalue | ( | obj, | |
| x | |||
| ) | { TValue *io=(obj); val_(io).p=(x); settt_(io, LUA_TLIGHTUSERDATA); } |
| #define setsvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define setthvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define setuservalue | ( | L, | |
| u, | |||
| o | |||
| ) |
| #define setuvalue | ( | L, | |
| obj, | |||
| x | |||
| ) |
| #define thvalue | ( | o | ) | check_exp(ttisthread(o), gco2th(val_(o).gc)) |
| #define tsslen | ( | s | ) | ((s)->tt == LUA_TSHRSTR ? (s)->shrlen : (s)->u.lnglen) |
| #define tsvalue | ( | o | ) | check_exp(ttisstring(o), gco2ts(val_(o).gc)) |
| #define ttisboolean | ( | o | ) | checktag((o), LUA_TBOOLEAN) |
| #define ttisclosure | ( | o | ) | ((rttype(o) & 0x1F) == LUA_TFUNCTION) |
| #define ttisdeadkey | ( | o | ) | checktag((o), LUA_TDEADKEY) |
| #define ttisfloat | ( | o | ) | checktag((o), LUA_TNUMFLT) |
| #define ttisfulluserdata | ( | o | ) | checktag((o), ctb(LUA_TUSERDATA)) |
| #define ttisfunction | ( | o | ) | checktype(o, LUA_TFUNCTION) |
| #define ttisinteger | ( | o | ) | checktag((o), LUA_TNUMINT) |
| #define ttislightuserdata | ( | o | ) | checktag((o), LUA_TLIGHTUSERDATA) |
| #define ttislngstring | ( | o | ) | checktag((o), ctb(LUA_TLNGSTR)) |
| #define ttisnumber | ( | o | ) | checktype((o), LUA_TNUMBER) |
| #define ttisshrstring | ( | o | ) | checktag((o), ctb(LUA_TSHRSTR)) |
| #define ttisstring | ( | o | ) | checktype((o), LUA_TSTRING) |
| #define ttistable | ( | o | ) | checktag((o), ctb(LUA_TTABLE)) |
| #define ttisthread | ( | o | ) | checktag((o), ctb(LUA_TTHREAD)) |
| #define uvalue | ( | o | ) | check_exp(ttisfulluserdata(o), gco2u(val_(o).gc)) |
| typedef struct lua_TValue TValue |
| int luaO_ceillog2 | ( | unsigned int | x | ) |
| void luaO_chunkid | ( | char * | out, |
| const char * | source, | ||
| size_t | len | ||
| ) |
| int luaO_fb2int | ( | int | x | ) |
| int luaO_hexavalue | ( | int | c | ) |
| int luaO_int2fb | ( | unsigned int | x | ) |
| const char* luaO_pushfstring | ( | lua_State * | L, |
| const char * | fmt, | ||
| ... | |||
| ) |
| const char* luaO_pushvfstring | ( | lua_State * | L, |
| const char * | fmt, | ||
| va_list | argp | ||
| ) |
| size_t luaO_str2num | ( | const char * | s, |
| TValue * | o | ||
| ) |
| int luaO_utf8esc | ( | char * | buff, |
| unsigned long | x | ||
| ) |
|
extern |
1.9.1