<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html><head><meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1">
<title>rpm: lua/lobject.h Source File</title>
<link href="doxygen.css" rel="stylesheet" type="text/css">
<link href="tabs.css" rel="stylesheet" type="text/css">
</head><body>
<!-- Generated by Doxygen 1.4.7 -->
<div class="tabs">
<ul>
<li><a href="index.html"><span>Main Page</span></a></li>
<li><a href="modules.html"><span>Modules</span></a></li>
<li><a href="annotated.html"><span>Data Structures</span></a></li>
<li id="current"><a href="files.html"><span>Files</span></a></li>
<li><a href="pages.html"><span>Related Pages</span></a></li>
</ul></div>
<div class="tabs">
<ul>
<li><a href="files.html"><span>File List</span></a></li>
<li><a href="globals.html"><span>Globals</span></a></li>
</ul></div>
<h1>lua/lobject.h</h1><a href="lobject_8h.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*</span>
<a name="l00002"></a>00002 <span class="comment">** $Id: lobject.h,v 1.2 2004/03/23 05:09:14 jbj Exp $</span>
<a name="l00003"></a>00003 <span class="comment">** Type definitions for Lua objects</span>
<a name="l00004"></a>00004 <span class="comment">** See Copyright Notice in lua.h</span>
<a name="l00005"></a>00005 <span class="comment">*/</span>
<a name="l00006"></a>00006
<a name="l00007"></a>00007 <span class="preprocessor">#ifndef lobject_h</span>
<a name="l00008"></a>00008 <span class="preprocessor"></span><span class="preprocessor">#define lobject_h</span>
<a name="l00009"></a>00009 <span class="preprocessor"></span>
<a name="l00010"></a>00010
<a name="l00011"></a>00011 <span class="preprocessor">#include "<a class="code" href="llimits_8h.html">llimits.h</a>"</span>
<a name="l00012"></a>00012 <span class="preprocessor">#include "lua.h"</span>
<a name="l00013"></a>00013
<a name="l00014"></a>00014
<a name="l00015"></a>00015 <span class="comment">/* tags for values visible from Lua */</span>
<a name="l00016"></a><a class="code" href="lobject_8h.html#7d349e859d6c2d9ca1f6b0c1da21a807">00016</a> <span class="preprocessor">#define NUM_TAGS LUA_TTHREAD</span>
<a name="l00017"></a>00017 <span class="preprocessor"></span>
<a name="l00018"></a>00018
<a name="l00019"></a>00019 <span class="comment">/*</span>
<a name="l00020"></a>00020 <span class="comment">** Extra tags for non-values</span>
<a name="l00021"></a>00021 <span class="comment">*/</span>
<a name="l00022"></a><a class="code" href="lobject_8h.html#a2a683d9e42dac5846eefa108297cbf0">00022</a> <span class="preprocessor">#define LUA_TPROTO (NUM_TAGS+1)</span>
<a name="l00023"></a><a class="code" href="lobject_8h.html#3175b6b959953f781a14a9291d9e22b6">00023</a> <span class="preprocessor"></span><span class="preprocessor">#define LUA_TUPVAL (NUM_TAGS+2)</span>
<a name="l00024"></a>00024 <span class="preprocessor"></span>
<a name="l00025"></a>00025
<a name="l00026"></a>00026 <span class="comment">/*</span>
<a name="l00027"></a>00027 <span class="comment">** Union of all collectable objects</span>
<a name="l00028"></a>00028 <span class="comment">*/</span>
<a name="l00029"></a><a class="code" href="lobject_8h.html#47a2498a002a2ee40292c57dd41c57c3">00029</a> <span class="keyword">typedef</span> <span class="keyword">union </span><a class="code" href="unionGCObject.html">GCObject</a> <a class="code" href="lobject_8h.html#47a2498a002a2ee40292c57dd41c57c3">GCObject</a>;
<a name="l00030"></a>00030
<a name="l00031"></a>00031
<a name="l00032"></a>00032 <span class="comment">/*</span>
<a name="l00033"></a>00033 <span class="comment">** Common Header for all collectable objects (in macro form, to be</span>
<a name="l00034"></a>00034 <span class="comment">** included in other objects)</span>
<a name="l00035"></a>00035 <span class="comment">*/</span>
<a name="l00036"></a><a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">00036</a> <span class="preprocessor">#define CommonHeader </span><span class="comment">/*@dependent@*/</span> <span class="comment">/*@null@*/</span> GCObject *next; lu_byte tt; lu_byte marked
<a name="l00037"></a>00037
<a name="l00038"></a>00038
<a name="l00039"></a>00039 <span class="comment">/*</span>
<a name="l00040"></a>00040 <span class="comment">** Common header in struct form</span>
<a name="l00041"></a>00041 <span class="comment">*/</span>
<a name="l00042"></a><a class="code" href="structGCheader.html">00042</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structGCheader.html">GCheader</a> {
<a name="l00043"></a><a class="code" href="structGCheader.html#952a882c3f16764f70c5e8dae8fb27eb">00043</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00044"></a>00044 } <a class="code" href="structGCheader.html">GCheader</a>;
<a name="l00045"></a>00045
<a name="l00046"></a>00046
<a name="l00047"></a>00047
<a name="l00048"></a>00048
<a name="l00049"></a>00049 <span class="comment">/*</span>
<a name="l00050"></a>00050 <span class="comment">** Union of all Lua values</span>
<a name="l00051"></a>00051 <span class="comment">*/</span>
<a name="l00052"></a><a class="code" href="unionValue.html">00052</a> <span class="keyword">typedef</span> <span class="keyword">union </span>{
<a name="l00053"></a>00053 <span class="comment">/*@relnull@*/</span>
<a name="l00054"></a><a class="code" href="unionValue.html#fc72971d7fb256f8286b0a763be3e543">00054</a> <a class="code" href="lobject_8h.html#47a2498a002a2ee40292c57dd41c57c3">GCObject</a> *gc;
<a name="l00055"></a><a class="code" href="unionValue.html#a001f39a25c7d85a27cbdbab2d386ccd">00055</a> <span class="keywordtype">void</span> *p;
<a name="l00056"></a><a class="code" href="unionValue.html#e8663f45c016d5fbf827cb308b2f3df8">00056</a> lua_Number n;
<a name="l00057"></a><a class="code" href="unionValue.html#121086ae65144dd506451da395cfa6b2">00057</a> <span class="keywordtype">int</span> b;
<a name="l00058"></a>00058 } <a class="code" href="unionValue.html">Value</a>;
<a name="l00059"></a>00059
<a name="l00060"></a>00060
<a name="l00061"></a>00061 <span class="comment">/*</span>
<a name="l00062"></a>00062 <span class="comment">** Lua values (or `tagged objects')</span>
<a name="l00063"></a>00063 <span class="comment">*/</span>
<a name="l00064"></a><a class="code" href="structlua__TObject.html">00064</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structlua__TObject.html">lua_TObject</a> {
<a name="l00065"></a><a class="code" href="structlua__TObject.html#333e47fa724b0981fee4c5d5a34122ac">00065</a> <span class="keywordtype">int</span> <a class="code" href="structlua__TObject.html#333e47fa724b0981fee4c5d5a34122ac">tt</a>;
<a name="l00066"></a><a class="code" href="structlua__TObject.html#f7f567757aacdb277569914eee1a619a">00066</a> <a class="code" href="unionValue.html">Value</a> <a class="code" href="structlua__TObject.html#f7f567757aacdb277569914eee1a619a">value</a>;
<a name="l00067"></a>00067 } <a class="code" href="structlua__TObject.html">TObject</a>;
<a name="l00068"></a>00068
<a name="l00069"></a>00069
<a name="l00070"></a>00070 <span class="comment">/* Macros to test type */</span>
<a name="l00071"></a><a class="code" href="lobject_8h.html#8630c13eaefbeaba1aa0933cab6e0238">00071</a> <span class="preprocessor">#define ttisnil(o) (ttype(o) == LUA_TNIL)</span>
<a name="l00072"></a><a class="code" href="lobject_8h.html#7a1392f89b1f29ed3b1afa37a22d0be2">00072</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisnumber(o) (ttype(o) == LUA_TNUMBER)</span>
<a name="l00073"></a><a class="code" href="lobject_8h.html#9bdf057a0de8da2ffae3ac35662dd255">00073</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisstring(o) (ttype(o) == LUA_TSTRING)</span>
<a name="l00074"></a><a class="code" href="lobject_8h.html#c5338f5fe3885d1ee65412e00a44384e">00074</a> <span class="preprocessor"></span><span class="preprocessor">#define ttistable(o) (ttype(o) == LUA_TTABLE)</span>
<a name="l00075"></a><a class="code" href="lobject_8h.html#48587dcb78721d149d3184d0768f4950">00075</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisfunction(o) (ttype(o) == LUA_TFUNCTION)</span>
<a name="l00076"></a><a class="code" href="lobject_8h.html#44a87a5873bd05973d6e3a4747175c06">00076</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisboolean(o) (ttype(o) == LUA_TBOOLEAN)</span>
<a name="l00077"></a><a class="code" href="lobject_8h.html#db92da594f060270240a415b3483efc2">00077</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisuserdata(o) (ttype(o) == LUA_TUSERDATA)</span>
<a name="l00078"></a><a class="code" href="lobject_8h.html#5ae8a42aa33c44ef3c98fcda8b7ab4c5">00078</a> <span class="preprocessor"></span><span class="preprocessor">#define ttisthread(o) (ttype(o) == LUA_TTHREAD)</span>
<a name="l00079"></a><a class="code" href="lobject_8h.html#6440445277dce2e73af1e043f9884d7a">00079</a> <span class="preprocessor"></span><span class="preprocessor">#define ttislightuserdata(o) (ttype(o) == LUA_TLIGHTUSERDATA)</span>
<a name="l00080"></a>00080 <span class="preprocessor"></span>
<a name="l00081"></a>00081 <span class="comment">/* Macros to access values */</span>
<a name="l00082"></a><a class="code" href="lobject_8h.html#cd205ab396b96fba48e1f758c17a2cf3">00082</a> <span class="preprocessor">#define ttype(o) ((o)->tt)</span>
<a name="l00083"></a><a class="code" href="lobject_8h.html#05cdf6070135f10ad37e1048a730b634">00083</a> <span class="preprocessor"></span><span class="preprocessor">#define gcvalue(o) check_exp(iscollectable(o), (o)->value.gc)</span>
<a name="l00084"></a><a class="code" href="lobject_8h.html#16c0267c035b3e4edda082e25069e8cf">00084</a> <span class="preprocessor"></span><span class="preprocessor">#define pvalue(o) check_exp(ttislightuserdata(o), (o)->value.p)</span>
<a name="l00085"></a><a class="code" href="lobject_8h.html#690ab618235691bb5a82610f07dd8684">00085</a> <span class="preprocessor"></span><span class="preprocessor">#define nvalue(o) check_exp(ttisnumber(o), (o)->value.n)</span>
<a name="l00086"></a><a class="code" href="lobject_8h.html#8661397faed512ccc9c70a4661f1a83d">00086</a> <span class="preprocessor"></span><span class="preprocessor">#define tsvalue(o) check_exp(ttisstring(o), &(o)->value.gc->ts)</span>
<a name="l00087"></a><a class="code" href="lobject_8h.html#1c49f55d93297e833141fb62903af3ad">00087</a> <span class="preprocessor"></span><span class="preprocessor">#define uvalue(o) check_exp(ttisuserdata(o), &(o)->value.gc->u)</span>
<a name="l00088"></a><a class="code" href="lobject_8h.html#4b49383d348897fe282c0d51354d8bc9">00088</a> <span class="preprocessor"></span><span class="preprocessor">#define clvalue(o) check_exp(ttisfunction(o), &(o)->value.gc->cl)</span>
<a name="l00089"></a><a class="code" href="lobject_8h.html#336a6ce5e8340e6de133ec249cf47ebf">00089</a> <span class="preprocessor"></span><span class="preprocessor">#define hvalue(o) check_exp(ttistable(o), &(o)->value.gc->h)</span>
<a name="l00090"></a><a class="code" href="lobject_8h.html#cabf05e821337a6de6a4a6632045032b">00090</a> <span class="preprocessor"></span><span class="preprocessor">#define bvalue(o) check_exp(ttisboolean(o), (o)->value.b)</span>
<a name="l00091"></a><a class="code" href="lobject_8h.html#516f32427f1c43ee187ce4c0db042959">00091</a> <span class="preprocessor"></span><span class="preprocessor">#define thvalue(o) check_exp(ttisthread(o), &(o)->value.gc->th)</span>
<a name="l00092"></a>00092 <span class="preprocessor"></span>
<a name="l00093"></a><a class="code" href="lobject_8h.html#188e1a95c8c6d547a13431a6e1edd5b3">00093</a> <span class="preprocessor">#define l_isfalse(o) (ttisnil(o) || (ttisboolean(o) && bvalue(o) == 0))</span>
<a name="l00094"></a>00094 <span class="preprocessor"></span>
<a name="l00095"></a>00095 <span class="comment">/* Macros to set values */</span>
<a name="l00096"></a><a class="code" href="lobject_8h.html#6e4ca2bc0025d5b310e7a78f3ac04fcc">00096</a> <span class="preprocessor">#define setnvalue(obj,x) \</span>
<a name="l00097"></a>00097 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TNUMBER; i_o->value.n=(x); }</span>
<a name="l00098"></a>00098 <span class="preprocessor"></span>
<a name="l00099"></a><a class="code" href="lobject_8h.html#a933caf0ae94d7e7afd0c14409386072">00099</a> <span class="preprocessor">#define chgnvalue(obj,x) \</span>
<a name="l00100"></a>00100 <span class="preprocessor"> check_exp(ttype(obj)==LUA_TNUMBER, (obj)->value.n=(x))</span>
<a name="l00101"></a>00101 <span class="preprocessor"></span>
<a name="l00102"></a><a class="code" href="lobject_8h.html#0784c90d154ccf7c643b56a00c62412a">00102</a> <span class="preprocessor">#define setpvalue(obj,x) \</span>
<a name="l00103"></a>00103 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TLIGHTUSERDATA; i_o->value.p=(x); }</span>
<a name="l00104"></a>00104 <span class="preprocessor"></span>
<a name="l00105"></a><a class="code" href="lobject_8h.html#22e86755164a1bc172b40f344d7ce70e">00105</a> <span class="preprocessor">#define setbvalue(obj,x) \</span>
<a name="l00106"></a>00106 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TBOOLEAN; i_o->value.b=(x); }</span>
<a name="l00107"></a>00107 <span class="preprocessor"></span>
<a name="l00108"></a><a class="code" href="lobject_8h.html#88987560065a1d05a069bc23514b0d3f">00108</a> <span class="preprocessor">#define setsvalue(obj,x) \</span>
<a name="l00109"></a>00109 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TSTRING; \</span>
<a name="l00110"></a>00110 <span class="preprocessor"> i_o->value.gc=cast(GCObject *, (x)); \</span>
<a name="l00111"></a>00111 <span class="preprocessor"> lua_assert(i_o->value.gc->gch.tt == LUA_TSTRING); }</span>
<a name="l00112"></a>00112 <span class="preprocessor"></span>
<a name="l00113"></a><a class="code" href="lobject_8h.html#179e340cf74f28c0bb2542720bf79715">00113</a> <span class="preprocessor">#define setuvalue(obj,x) \</span>
<a name="l00114"></a>00114 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TUSERDATA; \</span>
<a name="l00115"></a>00115 <span class="preprocessor"> i_o->value.gc=cast(GCObject *, (x)); \</span>
<a name="l00116"></a>00116 <span class="preprocessor"> lua_assert(i_o->value.gc->gch.tt == LUA_TUSERDATA); }</span>
<a name="l00117"></a>00117 <span class="preprocessor"></span>
<a name="l00118"></a><a class="code" href="lobject_8h.html#c89baee1f81675b16245eb5cbf148844">00118</a> <span class="preprocessor">#define setthvalue(obj,x) \</span>
<a name="l00119"></a>00119 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TTHREAD; \</span>
<a name="l00120"></a>00120 <span class="preprocessor"> i_o->value.gc=cast(GCObject *, (x)); \</span>
<a name="l00121"></a>00121 <span class="preprocessor"> lua_assert(i_o->value.gc->gch.tt == LUA_TTHREAD); }</span>
<a name="l00122"></a>00122 <span class="preprocessor"></span>
<a name="l00123"></a><a class="code" href="lobject_8h.html#06d38c1ec03438d53a42244a2baf662e">00123</a> <span class="preprocessor">#define setclvalue(obj,x) \</span>
<a name="l00124"></a>00124 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TFUNCTION; \</span>
<a name="l00125"></a>00125 <span class="preprocessor"> i_o->value.gc=cast(GCObject *, (x)); \</span>
<a name="l00126"></a>00126 <span class="preprocessor"> lua_assert(i_o->value.gc->gch.tt == LUA_TFUNCTION); }</span>
<a name="l00127"></a>00127 <span class="preprocessor"></span>
<a name="l00128"></a><a class="code" href="lobject_8h.html#20270a45b379e05f80f5a26744bf5698">00128</a> <span class="preprocessor">#define sethvalue(obj,x) \</span>
<a name="l00129"></a>00129 <span class="preprocessor"> { TObject *i_o=(obj); i_o->tt=LUA_TTABLE; \</span>
<a name="l00130"></a>00130 <span class="preprocessor"> i_o->value.gc=cast(GCObject *, (x)); \</span>
<a name="l00131"></a>00131 <span class="preprocessor"> lua_assert(i_o->value.gc->gch.tt == LUA_TTABLE); }</span>
<a name="l00132"></a>00132 <span class="preprocessor"></span>
<a name="l00133"></a><a class="code" href="lobject_8h.html#d9034def7bbc1965ec3d714d84620b07">00133</a> <span class="preprocessor">#define setnilvalue(obj) ((obj)->tt=LUA_TNIL)</span>
<a name="l00134"></a>00134 <span class="preprocessor"></span>
<a name="l00135"></a>00135
<a name="l00136"></a>00136
<a name="l00137"></a>00137 <span class="comment">/*</span>
<a name="l00138"></a>00138 <span class="comment">** for internal debug only</span>
<a name="l00139"></a>00139 <span class="comment">*/</span>
<a name="l00140"></a><a class="code" href="lobject_8h.html#d950fe2837e04aa03e52239d78ddf427">00140</a> <span class="preprocessor">#define checkconsistency(obj) \</span>
<a name="l00141"></a>00141 <span class="preprocessor"> lua_assert(!iscollectable(obj) || (ttype(obj) == (obj)->value.gc->gch.tt))</span>
<a name="l00142"></a>00142 <span class="preprocessor"></span>
<a name="l00143"></a>00143
<a name="l00144"></a><a class="code" href="lobject_8h.html#3c26115de0803ac1a3f51221bb9486e3">00144</a> <span class="preprocessor">#define setobj(obj1,obj2) \</span>
<a name="l00145"></a>00145 <span class="preprocessor"> { const TObject *o2=(obj2); TObject *o1=(obj1); \</span>
<a name="l00146"></a>00146 <span class="preprocessor"> checkconsistency(o2); \</span>
<a name="l00147"></a>00147 <span class="preprocessor"> o1->tt=o2->tt; o1->value = o2->value; }</span>
<a name="l00148"></a>00148 <span class="preprocessor"></span>
<a name="l00149"></a>00149
<a name="l00150"></a>00150 <span class="comment">/*</span>
<a name="l00151"></a>00151 <span class="comment">** different types of sets, according to destination</span>
<a name="l00152"></a>00152 <span class="comment">*/</span>
<a name="l00153"></a>00153
<a name="l00154"></a>00154 <span class="comment">/* from stack to (same) stack */</span>
<a name="l00155"></a><a class="code" href="lobject_8h.html#6d30d7fa36e78e0bfb56ba38d9e89ce2">00155</a> <span class="preprocessor">#define setobjs2s setobj</span>
<a name="l00156"></a>00156 <span class="preprocessor"></span><span class="comment">/* to stack (not from same stack) */</span>
<a name="l00157"></a><a class="code" href="lobject_8h.html#1c51b9462c606f1f97242fae6b1220d1">00157</a> <span class="preprocessor">#define setobj2s setobj</span>
<a name="l00158"></a><a class="code" href="lobject_8h.html#2defbd1005c5aebb5807517ddea80f3f">00158</a> <span class="preprocessor"></span><span class="preprocessor">#define setsvalue2s setsvalue</span>
<a name="l00159"></a>00159 <span class="preprocessor"></span><span class="comment">/* from table to same table */</span>
<a name="l00160"></a><a class="code" href="lobject_8h.html#0b6916971c4766bf58d942bf7a426c80">00160</a> <span class="preprocessor">#define setobjt2t setobj</span>
<a name="l00161"></a>00161 <span class="preprocessor"></span><span class="comment">/* to table */</span>
<a name="l00162"></a><a class="code" href="lobject_8h.html#defdd17d98f1f5734ee296395e1805d4">00162</a> <span class="preprocessor">#define setobj2t setobj</span>
<a name="l00163"></a>00163 <span class="preprocessor"></span><span class="comment">/* to new object */</span>
<a name="l00164"></a><a class="code" href="lobject_8h.html#d6d8d3d900cff1b02c3b269eabccccf9">00164</a> <span class="preprocessor">#define setobj2n setobj</span>
<a name="l00165"></a><a class="code" href="lobject_8h.html#a7a9ab918b0322fa100f3f7af16d2375">00165</a> <span class="preprocessor"></span><span class="preprocessor">#define setsvalue2n setsvalue</span>
<a name="l00166"></a>00166 <span class="preprocessor"></span>
<a name="l00167"></a><a class="code" href="lobject_8h.html#2816cdd0a22f933ee0b23321b0a200b0">00167</a> <span class="preprocessor">#define setttype(obj, tt) (ttype(obj) = (tt))</span>
<a name="l00168"></a>00168 <span class="preprocessor"></span>
<a name="l00169"></a>00169
<a name="l00170"></a><a class="code" href="lobject_8h.html#aabdb414706e6a904461e39967557185">00170</a> <span class="preprocessor">#define iscollectable(o) (ttype(o) >= LUA_TSTRING)</span>
<a name="l00171"></a>00171 <span class="preprocessor"></span>
<a name="l00172"></a>00172
<a name="l00173"></a>00173
<a name="l00174"></a><a class="code" href="lobject_8h.html#23f5c9e79d2d2ec7ba3d9a2fe7305104">00174</a> <span class="keyword">typedef</span> <a class="code" href="structlua__TObject.html">TObject</a> *<a class="code" href="structlua__TObject.html">StkId</a>; <span class="comment">/* index to stack elements */</span>
<a name="l00175"></a>00175
<a name="l00176"></a>00176
<a name="l00177"></a>00177 <span class="comment">/*</span>
<a name="l00178"></a>00178 <span class="comment">** String headers for string table</span>
<a name="l00179"></a>00179 <span class="comment">*/</span>
<a name="l00180"></a><a class="code" href="unionTString.html">00180</a> <span class="keyword">typedef</span> <span class="keyword">union </span><a class="code" href="unionTString.html">TString</a> {
<a name="l00181"></a><a class="code" href="unionTString.html#5fef2a0eccc5bb7ad6d04e021330f6a0">00181</a> <a class="code" href="unionL__Umaxalign.html">L_Umaxalign</a> <a class="code" href="unionTString.html#5fef2a0eccc5bb7ad6d04e021330f6a0">dummy</a>; <span class="comment">/* ensures maximum alignment for strings */</span>
<a name="l00182"></a>00182 <span class="keyword">struct </span>{
<a name="l00183"></a><a class="code" href="unionTString.html#9e42f40aa0344ba72b7a31fbe69860c0">00183</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00184"></a><a class="code" href="unionTString.html#34c83baac32690a37e49838d5ca42a9c">00184</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="unionTString.html#34c83baac32690a37e49838d5ca42a9c">reserved</a>;
<a name="l00185"></a><a class="code" href="unionTString.html#b3f2d9c4edaa2711d1f60c9f3a9154bd">00185</a> <a class="code" href="llimits_8h.html#6bd8ffeee8032212306017a8f3dda6c6">lu_hash</a> <a class="code" href="unionTString.html#b3f2d9c4edaa2711d1f60c9f3a9154bd">hash</a>;
<a name="l00186"></a><a class="code" href="unionTString.html#6b5aaf70a9fcad72f7ba17975f548b0d">00186</a> size_t <a class="code" href="unionTString.html#6b5aaf70a9fcad72f7ba17975f548b0d">len</a>;
<a name="l00187"></a>00187 } <a class="code" href="unionTString.html#255604d92e4b7497e037ea98a89fca5f">tsv</a>;
<a name="l00188"></a>00188 } <a class="code" href="unionTString.html">TString</a>;
<a name="l00189"></a>00189
<a name="l00190"></a>00190
<a name="l00191"></a><a class="code" href="lobject_8h.html#cb05d3ab238923581a9c629b8e11a6ac">00191</a> <span class="preprocessor">#define getstr(ts) cast(const char *, (ts) + 1)</span>
<a name="l00192"></a><a class="code" href="lobject_8h.html#c2c9eedf3ff2c3042445b3b534f161e1">00192</a> <span class="preprocessor"></span><span class="preprocessor">#define svalue(o) getstr(tsvalue(o))</span>
<a name="l00193"></a>00193 <span class="preprocessor"></span>
<a name="l00194"></a>00194
<a name="l00195"></a>00195
<a name="l00196"></a><a class="code" href="unionUdata.html">00196</a> <span class="keyword">typedef</span> <span class="keyword">union </span><a class="code" href="unionUdata.html">Udata</a> {
<a name="l00197"></a><a class="code" href="unionUdata.html#ae4ed9398973690def5f790b68104595">00197</a> <a class="code" href="unionL__Umaxalign.html">L_Umaxalign</a> <a class="code" href="unionUdata.html#ae4ed9398973690def5f790b68104595">dummy</a>; <span class="comment">/* ensures maximum alignment for `local' udata */</span>
<a name="l00198"></a>00198 <span class="keyword">struct </span>{
<a name="l00199"></a><a class="code" href="unionUdata.html#e80568ef2b271f37d45b2e6257edd761">00199</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00200"></a><a class="code" href="unionUdata.html#39f828bdcf3f046e285ffbecfcaea56b">00200</a> <span class="keyword">struct </span><a class="code" href="structTable.html">Table</a> *<a class="code" href="unionUdata.html#39f828bdcf3f046e285ffbecfcaea56b">metatable</a>;
<a name="l00201"></a><a class="code" href="unionUdata.html#bc467c0c1ec8511376150eb728514dc5">00201</a> size_t <a class="code" href="unionUdata.html#bc467c0c1ec8511376150eb728514dc5">len</a>;
<a name="l00202"></a>00202 } <a class="code" href="unionUdata.html#ed59bf14adb5708fbf68e2836dfcb8d3">uv</a>;
<a name="l00203"></a>00203 } <a class="code" href="unionUdata.html">Udata</a>;
<a name="l00204"></a>00204
<a name="l00205"></a>00205
<a name="l00206"></a>00206
<a name="l00207"></a>00207
<a name="l00208"></a>00208 <span class="comment">/*</span>
<a name="l00209"></a>00209 <span class="comment">** Function Prototypes</span>
<a name="l00210"></a>00210 <span class="comment">*/</span>
<a name="l00211"></a><a class="code" href="structProto.html">00211</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structProto.html">Proto</a> {
<a name="l00212"></a><a class="code" href="structProto.html#3ad1c271e4b7be4c30cc893e64d4c8a1">00212</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00213"></a>00213 <span class="comment">/*@relnull@*/</span>
<a name="l00214"></a><a class="code" href="structProto.html#f379e777efa031186320f7e90c14f8c9">00214</a> <a class="code" href="structlua__TObject.html">TObject</a> *<a class="code" href="structProto.html#f379e777efa031186320f7e90c14f8c9">k</a>; <span class="comment">/* constants used by the function */</span>
<a name="l00215"></a>00215 <span class="comment">/*@relnull@*/</span>
<a name="l00216"></a><a class="code" href="structProto.html#53b66e4e4ac4b612a41b67a0ace9b6a5">00216</a> <a class="code" href="llimits_8h.html#f6c47c68c1e6b0387c915031e0e681e3">Instruction</a> *<a class="code" href="structProto.html#53b66e4e4ac4b612a41b67a0ace9b6a5">code</a>;
<a name="l00217"></a>00217 <span class="comment">/*@relnull@*/</span>
<a name="l00218"></a><a class="code" href="structProto.html#54dc8e2e8973007794fa0ab0e4a71461">00218</a> <span class="keyword">struct </span><a class="code" href="structProto.html">Proto</a> **<a class="code" href="structProto.html#54dc8e2e8973007794fa0ab0e4a71461">p</a>; <span class="comment">/* functions defined inside the function */</span>
<a name="l00219"></a>00219 <span class="comment">/*@relnull@*/</span>
<a name="l00220"></a><a class="code" href="structProto.html#7b35e79a276933f7e71edceec5b4593d">00220</a> <span class="keywordtype">int</span> *<a class="code" href="structProto.html#7b35e79a276933f7e71edceec5b4593d">lineinfo</a>; <span class="comment">/* map from opcodes to source lines */</span>
<a name="l00221"></a>00221 <span class="comment">/*@relnull@*/</span>
<a name="l00222"></a><a class="code" href="structProto.html#24fd00345a3dad92baf371a9c96ba140">00222</a> <span class="keyword">struct </span><a class="code" href="structLocVar.html">LocVar</a> *<a class="code" href="structProto.html#24fd00345a3dad92baf371a9c96ba140">locvars</a>; <span class="comment">/* information about local variables */</span>
<a name="l00223"></a>00223 <span class="comment">/*@relnull@*/</span>
<a name="l00224"></a><a class="code" href="structProto.html#bebc63aea579a1b630efc04d2bf9c4b7">00224</a> <a class="code" href="unionTString.html">TString</a> **<a class="code" href="structProto.html#bebc63aea579a1b630efc04d2bf9c4b7">upvalues</a>; <span class="comment">/* upvalue names */</span>
<a name="l00225"></a>00225 <span class="comment">/*@relnull@*/</span>
<a name="l00226"></a><a class="code" href="structProto.html#92b6ec319e7aa1ee8b8ff7807353ad96">00226</a> <a class="code" href="unionTString.html">TString</a> *<a class="code" href="structProto.html#92b6ec319e7aa1ee8b8ff7807353ad96">source</a>;
<a name="l00227"></a><a class="code" href="structProto.html#6ecec897497ba7d94df6ef69289ef5c0">00227</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#6ecec897497ba7d94df6ef69289ef5c0">sizeupvalues</a>;
<a name="l00228"></a><a class="code" href="structProto.html#5bd719e0486168f6ecd4b01bf41a7444">00228</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#5bd719e0486168f6ecd4b01bf41a7444">sizek</a>; <span class="comment">/* size of `k' */</span>
<a name="l00229"></a><a class="code" href="structProto.html#43e4d3849b5859112d93bdc2534a7cc0">00229</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#43e4d3849b5859112d93bdc2534a7cc0">sizecode</a>;
<a name="l00230"></a><a class="code" href="structProto.html#65303ae1d815313f3358a578113fcc6e">00230</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#65303ae1d815313f3358a578113fcc6e">sizelineinfo</a>;
<a name="l00231"></a><a class="code" href="structProto.html#73ddad1a18b7c46be46ec32aa2a08632">00231</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#73ddad1a18b7c46be46ec32aa2a08632">sizep</a>; <span class="comment">/* size of `p' */</span>
<a name="l00232"></a><a class="code" href="structProto.html#c2ab37e941e8866687f44f7b2f4b95a9">00232</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#c2ab37e941e8866687f44f7b2f4b95a9">sizelocvars</a>;
<a name="l00233"></a><a class="code" href="structProto.html#03213e8977769a6c465e3f47028f0de0">00233</a> <span class="keywordtype">int</span> <a class="code" href="structProto.html#03213e8977769a6c465e3f47028f0de0">lineDefined</a>;
<a name="l00234"></a>00234 <span class="comment">/*@relnull@*/</span>
<a name="l00235"></a><a class="code" href="structProto.html#7991ec396b493a42b5c7f38b4e162959">00235</a> <a class="code" href="lobject_8h.html#47a2498a002a2ee40292c57dd41c57c3">GCObject</a> *<a class="code" href="structProto.html#7991ec396b493a42b5c7f38b4e162959">gclist</a>;
<a name="l00236"></a><a class="code" href="structProto.html#e20e9996154a89085ac03eaaf8f23d32">00236</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structProto.html#e20e9996154a89085ac03eaaf8f23d32">nups</a>; <span class="comment">/* number of upvalues */</span>
<a name="l00237"></a><a class="code" href="structProto.html#3f106f177af6c68ffd8b042713266b98">00237</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structProto.html#3f106f177af6c68ffd8b042713266b98">numparams</a>;
<a name="l00238"></a><a class="code" href="structProto.html#82302f2e9040b681d5b34c1239dcd673">00238</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structProto.html#82302f2e9040b681d5b34c1239dcd673">is_vararg</a>;
<a name="l00239"></a><a class="code" href="structProto.html#9c9ed4e9d996233f75cdf56b912e4803">00239</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structProto.html#9c9ed4e9d996233f75cdf56b912e4803">maxstacksize</a>;
<a name="l00240"></a>00240 } <a class="code" href="structProto.html">Proto</a>;
<a name="l00241"></a>00241
<a name="l00242"></a>00242
<a name="l00243"></a><a class="code" href="structLocVar.html">00243</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structLocVar.html">LocVar</a> {
<a name="l00244"></a>00244 <span class="comment">/*@relnull@*/</span>
<a name="l00245"></a><a class="code" href="structLocVar.html#cf62684d78349320b90b4acfa3b6d22a">00245</a> <a class="code" href="unionTString.html">TString</a> *<a class="code" href="structLocVar.html#cf62684d78349320b90b4acfa3b6d22a">varname</a>;
<a name="l00246"></a><a class="code" href="structLocVar.html#c5a8bf5a59430eea070db5b1a97d8b88">00246</a> <span class="keywordtype">int</span> <a class="code" href="structLocVar.html#c5a8bf5a59430eea070db5b1a97d8b88">startpc</a>; <span class="comment">/* first point where variable is active */</span>
<a name="l00247"></a><a class="code" href="structLocVar.html#f7f0f7d509579ffec5610e329f85693b">00247</a> <span class="keywordtype">int</span> <a class="code" href="structLocVar.html#f7f0f7d509579ffec5610e329f85693b">endpc</a>; <span class="comment">/* first point where variable is dead */</span>
<a name="l00248"></a>00248 } <a class="code" href="structLocVar.html">LocVar</a>;
<a name="l00249"></a>00249
<a name="l00250"></a>00250
<a name="l00251"></a>00251
<a name="l00252"></a>00252 <span class="comment">/*</span>
<a name="l00253"></a>00253 <span class="comment">** Upvalues</span>
<a name="l00254"></a>00254 <span class="comment">*/</span>
<a name="l00255"></a>00255
<a name="l00256"></a><a class="code" href="structUpVal.html">00256</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structUpVal.html">UpVal</a> {
<a name="l00257"></a><a class="code" href="structUpVal.html#c5644323dcf034541299ba28c9489d84">00257</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00258"></a>00258 <span class="comment">/*@null@*/</span>
<a name="l00259"></a><a class="code" href="structUpVal.html#c8b2cd011ef64f1929cbafdd5bf96adc">00259</a> <a class="code" href="structlua__TObject.html">TObject</a> *<a class="code" href="structUpVal.html#c8b2cd011ef64f1929cbafdd5bf96adc">v</a>; <span class="comment">/* points to stack or to its own value */</span>
<a name="l00260"></a><a class="code" href="structUpVal.html#d1cb3905dee06e42bef08fbb4b516d48">00260</a> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="structUpVal.html#d1cb3905dee06e42bef08fbb4b516d48">value</a>; <span class="comment">/* the value (when closed) */</span>
<a name="l00261"></a>00261 } <a class="code" href="structUpVal.html">UpVal</a>;
<a name="l00262"></a>00262
<a name="l00263"></a>00263
<a name="l00264"></a>00264 <span class="comment">/*</span>
<a name="l00265"></a>00265 <span class="comment">** Closures</span>
<a name="l00266"></a>00266 <span class="comment">*/</span>
<a name="l00267"></a>00267
<a name="l00268"></a><a class="code" href="lobject_8h.html#a6994808abcc30f100e21e34b84d3ae0">00268</a> <span class="preprocessor">#define ClosureHeader \</span>
<a name="l00269"></a>00269 <span class="preprocessor"> CommonHeader; lu_byte isC; lu_byte nupvalues; </span><span class="comment">/*@null@*/</span> GCObject *gclist
<a name="l00270"></a>00270
<a name="l00271"></a><a class="code" href="structCClosure.html">00271</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structCClosure.html">CClosure</a> {
<a name="l00272"></a><a class="code" href="structCClosure.html#524f1be20126b33259175bbdc54858ca">00272</a> <a class="code" href="lobject_8h.html#a6994808abcc30f100e21e34b84d3ae0">ClosureHeader</a>;
<a name="l00273"></a><a class="code" href="structCClosure.html#1ba64febc8e6adc43fdbb82583852000">00273</a> lua_CFunction <a class="code" href="structCClosure.html#1ba64febc8e6adc43fdbb82583852000">f</a>;
<a name="l00274"></a><a class="code" href="structCClosure.html#23090b10624563779c1d537ba974b59d">00274</a> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="structCClosure.html#23090b10624563779c1d537ba974b59d">upvalue</a>[1];
<a name="l00275"></a>00275 } <a class="code" href="structCClosure.html">CClosure</a>;
<a name="l00276"></a>00276
<a name="l00277"></a>00277
<a name="l00278"></a><a class="code" href="structLClosure.html">00278</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structLClosure.html">LClosure</a> {
<a name="l00279"></a><a class="code" href="structLClosure.html#8b094905eb8052f6a3a7cfa0cdd691bf">00279</a> <a class="code" href="lobject_8h.html#a6994808abcc30f100e21e34b84d3ae0">ClosureHeader</a>;
<a name="l00280"></a><a class="code" href="structLClosure.html#4cf173817d3897b0e70822e70d241d6c">00280</a> <span class="keyword">struct </span><a class="code" href="structProto.html">Proto</a> *<a class="code" href="structLClosure.html#4cf173817d3897b0e70822e70d241d6c">p</a>;
<a name="l00281"></a><a class="code" href="structLClosure.html#64f4853f6bad93920ccb1158c0da87e7">00281</a> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="structLClosure.html#64f4853f6bad93920ccb1158c0da87e7">g</a>; <span class="comment">/* global table for this closure */</span>
<a name="l00282"></a><a class="code" href="structLClosure.html#94886e7c7df838f5fab36575b0554682">00282</a> <a class="code" href="structUpVal.html">UpVal</a> *<a class="code" href="structLClosure.html#94886e7c7df838f5fab36575b0554682">upvals</a>[1];
<a name="l00283"></a>00283 } <a class="code" href="structLClosure.html">LClosure</a>;
<a name="l00284"></a>00284
<a name="l00285"></a>00285
<a name="l00286"></a><a class="code" href="unionClosure.html">00286</a> <span class="keyword">typedef</span> <span class="keyword">union </span><a class="code" href="unionClosure.html">Closure</a> {
<a name="l00287"></a><a class="code" href="unionClosure.html#ce9dac5a62b61db682ef0cd86b3b44b1">00287</a> <a class="code" href="structCClosure.html">CClosure</a> <a class="code" href="unionClosure.html#ce9dac5a62b61db682ef0cd86b3b44b1">c</a>;
<a name="l00288"></a><a class="code" href="unionClosure.html#8c338ec7dc76078cbee5887857de713c">00288</a> <a class="code" href="structLClosure.html">LClosure</a> <a class="code" href="unionClosure.html#8c338ec7dc76078cbee5887857de713c">l</a>;
<a name="l00289"></a>00289 } <a class="code" href="unionClosure.html">Closure</a>;
<a name="l00290"></a>00290
<a name="l00291"></a>00291
<a name="l00292"></a><a class="code" href="lobject_8h.html#6461891bd185c211514aef4fa7179767">00292</a> <span class="preprocessor">#define iscfunction(o) (ttype(o) == LUA_TFUNCTION && clvalue(o)->c.isC)</span>
<a name="l00293"></a><a class="code" href="lobject_8h.html#6e8ea4626fad5e23912d4e26d0b09200">00293</a> <span class="preprocessor"></span><span class="preprocessor">#define isLfunction(o) (ttype(o) == LUA_TFUNCTION && !clvalue(o)->c.isC)</span>
<a name="l00294"></a>00294 <span class="preprocessor"></span>
<a name="l00295"></a>00295
<a name="l00296"></a>00296 <span class="comment">/*</span>
<a name="l00297"></a>00297 <span class="comment">** Tables</span>
<a name="l00298"></a>00298 <span class="comment">*/</span>
<a name="l00299"></a>00299
<a name="l00300"></a><a class="code" href="structNode.html">00300</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structNode.html">Node</a> {
<a name="l00301"></a><a class="code" href="structNode.html#849ef203f7fc96826ebfc739f7fa9687">00301</a> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="structNode.html#849ef203f7fc96826ebfc739f7fa9687">i_key</a>;
<a name="l00302"></a><a class="code" href="structNode.html#e193e4186fa2d3b7f6d1413238886abf">00302</a> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="structNode.html#e193e4186fa2d3b7f6d1413238886abf">i_val</a>;
<a name="l00303"></a><a class="code" href="structNode.html#f67b110ca1a258b793bf69d306929b22">00303</a> <span class="keyword">struct </span><a class="code" href="structNode.html">Node</a> *<a class="code" href="structNode.html#f67b110ca1a258b793bf69d306929b22">next</a>; <span class="comment">/* for chaining */</span>
<a name="l00304"></a>00304 } <a class="code" href="structNode.html">Node</a>;
<a name="l00305"></a>00305
<a name="l00306"></a>00306
<a name="l00307"></a><a class="code" href="structTable.html">00307</a> <span class="keyword">typedef</span> <span class="keyword">struct </span><a class="code" href="structTable.html">Table</a> {
<a name="l00308"></a><a class="code" href="structTable.html#8a1f419969d5e857bbf8d86915147a14">00308</a> <a class="code" href="lobject_8h.html#5ee24faa024428a3c176895fe9925031">CommonHeader</a>;
<a name="l00309"></a><a class="code" href="structTable.html#643cf38ebbab9e5af99ff8a980ffbae5">00309</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structTable.html#643cf38ebbab9e5af99ff8a980ffbae5">flags</a>; <span class="comment">/* 1<<p means tagmethod(p) is not present */</span>
<a name="l00310"></a><a class="code" href="structTable.html#ed057d880ebe0f38f65e626f646adf6a">00310</a> <a class="code" href="llimits_8h.html#e1fe9ac10d9803bd1d7bdf30b18bad68">lu_byte</a> <a class="code" href="structTable.html#ed057d880ebe0f38f65e626f646adf6a">lsizenode</a>; <span class="comment">/* log2 of size of `node' array */</span>
<a name="l00311"></a><a class="code" href="structTable.html#99c20fa696fb6a4e89890efa3819ebdc">00311</a> <span class="keyword">struct </span><a class="code" href="structTable.html">Table</a> *<a class="code" href="structTable.html#99c20fa696fb6a4e89890efa3819ebdc">metatable</a>;
<a name="l00312"></a>00312 <span class="comment">/*@null@*/</span>
<a name="l00313"></a><a class="code" href="structTable.html#193ec6402a4e6e6aa976ca1ffe7186d3">00313</a> <a class="code" href="structlua__TObject.html">TObject</a> *<a class="code" href="structTable.html#193ec6402a4e6e6aa976ca1ffe7186d3">array</a>; <span class="comment">/* array part */</span>
<a name="l00314"></a>00314 <span class="comment">/*@owned@*/</span> <span class="comment">/*@null@*/</span>
<a name="l00315"></a><a class="code" href="structTable.html#519f179c707cb4e93bb66d09151c89e5">00315</a> <a class="code" href="structNode.html">Node</a> *<a class="code" href="structTable.html#519f179c707cb4e93bb66d09151c89e5">node</a>;
<a name="l00316"></a><a class="code" href="structTable.html#bab599417e4012c09675c2aff716b116">00316</a> <a class="code" href="structNode.html">Node</a> *<a class="code" href="structTable.html#bab599417e4012c09675c2aff716b116">firstfree</a>; <span class="comment">/* this position is free; all positions after it are full */</span>
<a name="l00317"></a><a class="code" href="structTable.html#1b6f3d76efed2011a36ee7c78f65aa70">00317</a> <a class="code" href="lobject_8h.html#47a2498a002a2ee40292c57dd41c57c3">GCObject</a> *<a class="code" href="structTable.html#1b6f3d76efed2011a36ee7c78f65aa70">gclist</a>;
<a name="l00318"></a><a class="code" href="structTable.html#2c648e99fcf88c4660c97e7d9408b50f">00318</a> <span class="keywordtype">int</span> <a class="code" href="structTable.html#2c648e99fcf88c4660c97e7d9408b50f">sizearray</a>; <span class="comment">/* size of `array' array */</span>
<a name="l00319"></a>00319 } <a class="code" href="structTable.html">Table</a>;
<a name="l00320"></a>00320
<a name="l00321"></a>00321
<a name="l00322"></a>00322
<a name="l00323"></a>00323 <span class="comment">/*</span>
<a name="l00324"></a>00324 <span class="comment">** `module' operation for hashing (size is always a power of 2)</span>
<a name="l00325"></a>00325 <span class="comment">*/</span>
<a name="l00326"></a><a class="code" href="lobject_8h.html#528d710ddad324002e3cb47992740b6a">00326</a> <span class="preprocessor">#define lmod(s,size) \</span>
<a name="l00327"></a>00327 <span class="preprocessor"> check_exp((size&(size-1))==0, (cast(int, (s) & ((size)-1))))</span>
<a name="l00328"></a>00328 <span class="preprocessor"></span>
<a name="l00329"></a>00329
<a name="l00330"></a><a class="code" href="lobject_8h.html#a341ef742b199e1c29a19d2c490ad74e">00330</a> <span class="preprocessor">#define twoto(x) (1<<(x))</span>
<a name="l00331"></a><a class="code" href="lobject_8h.html#2fbf715e78eaa889ed0fb9d4514e736a">00331</a> <span class="preprocessor"></span><span class="preprocessor">#define sizenode(t) (twoto((t)->lsizenode))</span>
<a name="l00332"></a>00332 <span class="preprocessor"></span>
<a name="l00333"></a>00333
<a name="l00334"></a>00334
<a name="l00335"></a>00335 <span class="comment">/*@unchecked@*/</span>
<a name="l00336"></a>00336 <span class="keyword">extern</span> <span class="keyword">const</span> <a class="code" href="structlua__TObject.html">TObject</a> <a class="code" href="lobject_8c.html#d1a3c1dd876eb5bb36cb081eee03b12f">luaO_nilobject</a>;
<a name="l00337"></a>00337
<a name="l00338"></a>00338 <span class="keywordtype">int</span> <a class="code" href="lobject_8c.html#dd64dfff81baeccf18056c1e0aa665f7">luaO_log2</a> (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> x)
<a name="l00339"></a>00339 <span class="comment">/*@*/</span>;
<a name="l00340"></a>00340 <span class="keywordtype">int</span> <a class="code" href="lobject_8c.html#cbb799248ff2c18c780d58034b448361">luaO_int2fb</a> (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> x)
<a name="l00341"></a>00341 <span class="comment">/*@*/</span>;
<a name="l00342"></a><a class="code" href="lobject_8h.html#373965334f4beab293057782143cdf80">00342</a> <span class="preprocessor">#define fb2int(x) (((x) & 7) << ((x) >> 3))</span>
<a name="l00343"></a>00343 <span class="preprocessor"></span>
<a name="l00344"></a>00344 <span class="keywordtype">int</span> <a class="code" href="lobject_8c.html#2c963aaa8c57f506eaededeea54c65ba">luaO_rawequalObj</a> (<span class="keyword">const</span> <a class="code" href="structlua__TObject.html">TObject</a> *t1, <span class="keyword">const</span> <a class="code" href="structlua__TObject.html">TObject</a> *t2)
<a name="l00345"></a>00345 <span class="comment">/*@*/</span>;
<a name="l00346"></a>00346 <span class="keywordtype">int</span> <a class="code" href="lobject_8c.html#b1e3654d45c2d88563b84f63a456e97a">luaO_str2d</a> (<span class="keyword">const</span> <span class="keywordtype">char</span> *s, lua_Number *result)
<a name="l00347"></a>00347 <span class="comment">/*@modifies *result @*/</span>;
<a name="l00348"></a>00348
<a name="l00349"></a>00349 <span class="comment">/*@observer@*/</span>
<a name="l00350"></a>00350 <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="lobject_8c.html#a83fa444a36d79521e846a766fa083d5">luaO_pushvfstring</a> (<a class="code" href="structlua__State.html">lua_State</a> *L, <span class="keyword">const</span> <span class="keywordtype">char</span> *fmt, va_list argp)
<a name="l00351"></a>00351 <span class="comment">/*@modifies L @*/</span>;
<a name="l00352"></a>00352 <span class="comment">/*@observer@*/</span>
<a name="l00353"></a>00353 <span class="keyword">const</span> <span class="keywordtype">char</span> *<a class="code" href="lobject_8c.html#8e224db7123c74d695076a96d1bfda61">luaO_pushfstring</a> (<a class="code" href="structlua__State.html">lua_State</a> *L, <span class="keyword">const</span> <span class="keywordtype">char</span> *fmt, ...)
<a name="l00354"></a>00354 <span class="comment">/*@modifies L @*/</span>;
<a name="l00355"></a>00355 <span class="keywordtype">void</span> <a class="code" href="lobject_8c.html#1fef443ca4d3a9eb0168a36ade19f6a6">luaO_chunkid</a> (<span class="keywordtype">char</span> *out, <span class="keyword">const</span> <span class="keywordtype">char</span> *source, <span class="keywordtype">int</span> len)
<a name="l00356"></a>00356 <span class="comment">/*@modifies *out @*/</span>;
<a name="l00357"></a>00357
<a name="l00358"></a>00358
<a name="l00359"></a>00359 <span class="preprocessor">#endif</span>
</pre></div><hr size="1"><address style="align: right;"><small>Generated on 1 Oct 2013 for rpm by
<a href="http://www.doxygen.org/index.html">
<img src="doxygen.png" alt="doxygen" align="middle" border="0"></a> 1.4.7 </small></address>
</body>
</html>
