Mercurial > repos > rhope

comparison runtime/func.h @ 100:f51c4c17457c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Broken port of parser to compiler
author Mike Pavone <pavone@retrodev.com>
date Mon, 09 Aug 2010 02:03:57 -0400
parents 6d10b5b9ebc3
children f4fc0a98088a
comparison
equal deleted inserted replaced
99:e09c2d1d6d5b 100:f51c4c17457c
134 134
135 #define PrepCall(callspace) cdata = alloc_cdata(ct, cdata, callspace); 135 #define PrepCall(callspace) cdata = alloc_cdata(ct, cdata, callspace);
136 136
137 #define SetParam(num,value) cdata->params[num] = value; 137 #define SetParam(num,value) cdata->params[num] = value;
138 138
139
140 #define VCRePrepCall(func,numparams,lastnumparams) \
141 if(numparams + ((t_Worker *)func)->payload.Count > lastnumparams)\
142 {\
143 temp_cdata = cdata->lastframe;\
144 free_stack(ct, cdata);\
145 cdata = alloc_cdata(ct, temp_cdata, numparams + ((t_Worker *)func)->payload.Count);\
146 }\
147 vcparam_offset = 0;
148
139 #define VCPrepCall(func,numparams) \ 149 #define VCPrepCall(func,numparams) \
140 cdata = alloc_cdata(ct, cdata, numparams + ((t_Worker *)func)->payload.Count);\ 150 cdata = alloc_cdata(ct, cdata, numparams + ((t_Worker *)func)->payload.Count);\
141 vcparam_offset = 0; 151 vcparam_offset = 0;
142 152
143 #define VCSetParam(func,num,value) \ 153 #define VCSetParam(func,num,value) \