218 |
|
|
219 |
#include <varargs.h> |
#include <varargs.h> |
220 |
|
|
221 |
|
/* This is a temporary workaround. m68k cannot find the result |
222 |
|
of a function returning long when invoked via a function pointer |
223 |
|
declared as a function returning a pointer, in this case, an |
224 |
|
object. A proper fix will require rewriting sections of the lisp |
225 |
|
compiler to separate the calling procedures for functions returning |
226 |
|
an object from functions returning a long. CM 20020801 */ |
227 |
|
#if defined(__mc68020__) |
228 |
|
#define LCAST(a) (object)(*(long(*)())a) |
229 |
|
#else |
230 |
|
#define LCAST(a) (*a) |
231 |
|
#endif |
232 |
|
|
233 |
object |
object |
234 |
c_apply_n(object (*fn)(), int n, object *x) |
c_apply_n(object (*fn)(), int n, object *x) |
235 |
{object res=Cnil; |
{object res=Cnil; |
236 |
switch(n){ |
switch(n){ |
237 |
case 0: res=(*fn)();break; |
case 0: res=LCAST(fn)();break; |
238 |
case 1: res=(*fn)(x[0]);break; |
case 1: res=LCAST(fn)(x[0]);break; |
239 |
case 2: res=(*fn)(x[0],x[1]);break; |
case 2: res=LCAST(fn)(x[0],x[1]);break; |
240 |
case 3: res=(*fn)(x[0],x[1],x[2]);break; |
case 3: res=LCAST(fn)(x[0],x[1],x[2]);break; |
241 |
case 4: res=(*fn)(x[0],x[1],x[2],x[3]);break; |
case 4: res=LCAST(fn)(x[0],x[1],x[2],x[3]);break; |
242 |
case 5: res=(*fn)(x[0],x[1],x[2],x[3],x[4]);break; |
case 5: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4]);break; |
243 |
case 6: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5]);break; |
case 6: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5]);break; |
244 |
case 7: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6]);break; |
case 7: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6]);break; |
245 |
case 8: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7]);break; |
case 8: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7]);break; |
246 |
case 9: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 9: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
247 |
x[8]);break; |
x[8]);break; |
248 |
case 10: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 10: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
249 |
x[8],x[9]);break; |
x[8],x[9]);break; |
250 |
case 11: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 11: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
251 |
x[8],x[9],x[10]);break; |
x[8],x[9],x[10]);break; |
252 |
case 12: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 12: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
253 |
x[8],x[9],x[10],x[11]);break; |
x[8],x[9],x[10],x[11]);break; |
254 |
case 13: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 13: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
255 |
x[8],x[9],x[10],x[11],x[12]);break; |
x[8],x[9],x[10],x[11],x[12]);break; |
256 |
case 14: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 14: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
257 |
x[8],x[9],x[10],x[11],x[12],x[13]);break; |
x[8],x[9],x[10],x[11],x[12],x[13]);break; |
258 |
case 15: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 15: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
259 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14]);break; |
x[8],x[9],x[10],x[11],x[12],x[13],x[14]);break; |
260 |
case 16: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 16: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
261 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
262 |
x[15]);break; |
x[15]);break; |
263 |
case 17: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 17: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
264 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
265 |
x[15],x[16]);break; |
x[15],x[16]);break; |
266 |
case 18: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 18: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
267 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
268 |
x[15],x[16],x[17]);break; |
x[15],x[16],x[17]);break; |
269 |
case 19: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 19: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
270 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
271 |
x[15],x[16],x[17],x[18]);break; |
x[15],x[16],x[17],x[18]);break; |
272 |
case 20: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 20: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
273 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
274 |
x[15],x[16],x[17],x[18],x[19]);break; |
x[15],x[16],x[17],x[18],x[19]);break; |
275 |
case 21: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 21: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
276 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
277 |
x[15],x[16],x[17],x[18],x[19],x[20]);break; |
x[15],x[16],x[17],x[18],x[19],x[20]);break; |
278 |
case 22: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 22: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
279 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
280 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21]);break; |
x[15],x[16],x[17],x[18],x[19],x[20],x[21]);break; |
281 |
case 23: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 23: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
282 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
283 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
284 |
x[22]);break; |
x[22]);break; |
285 |
case 24: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 24: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
286 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
287 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
288 |
x[22],x[23]);break; |
x[22],x[23]);break; |
289 |
case 25: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 25: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
290 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
291 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
292 |
x[22],x[23],x[24]);break; |
x[22],x[23],x[24]);break; |
293 |
case 26: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 26: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
294 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
295 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
296 |
x[22],x[23],x[24],x[25]);break; |
x[22],x[23],x[24],x[25]);break; |
297 |
case 27: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 27: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
298 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
299 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
300 |
x[22],x[23],x[24],x[25],x[26]);break; |
x[22],x[23],x[24],x[25],x[26]);break; |
301 |
case 28: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 28: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
302 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
303 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
304 |
x[22],x[23],x[24],x[25],x[26],x[27]);break; |
x[22],x[23],x[24],x[25],x[26],x[27]);break; |
305 |
case 29: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 29: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
306 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
307 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
308 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28]);break; |
x[22],x[23],x[24],x[25],x[26],x[27],x[28]);break; |
309 |
case 30: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 30: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
310 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
311 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
312 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
313 |
x[29]);break; |
x[29]);break; |
314 |
case 31: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 31: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
315 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
316 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
317 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
318 |
x[29],x[30]);break; |
x[29],x[30]);break; |
319 |
case 32: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 32: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
320 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
321 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
322 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
323 |
x[29],x[30],x[31]);break; |
x[29],x[30],x[31]);break; |
324 |
case 33: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 33: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
325 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
326 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
327 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
328 |
x[29],x[30],x[31],x[32]);break; |
x[29],x[30],x[31],x[32]);break; |
329 |
case 34: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 34: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
330 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
331 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
332 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
333 |
x[29],x[30],x[31],x[32],x[33]);break; |
x[29],x[30],x[31],x[32],x[33]);break; |
334 |
case 35: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 35: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
335 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
336 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
337 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
338 |
x[29],x[30],x[31],x[32],x[33],x[34]);break; |
x[29],x[30],x[31],x[32],x[33],x[34]);break; |
339 |
case 36: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 36: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
340 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
341 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
342 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
343 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35]);break; |
x[29],x[30],x[31],x[32],x[33],x[34],x[35]);break; |
344 |
case 37: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 37: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
345 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
346 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
347 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
348 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
349 |
x[36]);break; |
x[36]);break; |
350 |
case 38: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 38: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
351 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
352 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
353 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
354 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
355 |
x[36],x[37]);break; |
x[36],x[37]);break; |
356 |
case 39: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 39: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
357 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
358 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
359 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
360 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
361 |
x[36],x[37],x[38]);break; |
x[36],x[37],x[38]);break; |
362 |
case 40: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 40: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
363 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
364 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
365 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
366 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
367 |
x[36],x[37],x[38],x[39]);break; |
x[36],x[37],x[38],x[39]);break; |
368 |
case 41: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 41: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
369 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
370 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
371 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
372 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
373 |
x[36],x[37],x[38],x[39],x[40]);break; |
x[36],x[37],x[38],x[39],x[40]);break; |
374 |
case 42: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 42: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
375 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
376 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
377 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
378 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
379 |
x[36],x[37],x[38],x[39],x[40],x[41]);break; |
x[36],x[37],x[38],x[39],x[40],x[41]);break; |
380 |
case 43: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 43: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
381 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
382 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
383 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
384 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
385 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42]);break; |
x[36],x[37],x[38],x[39],x[40],x[41],x[42]);break; |
386 |
case 44: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 44: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
387 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
388 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
389 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
390 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
391 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
392 |
x[43]);break; |
x[43]);break; |
393 |
case 45: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 45: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
394 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
395 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
396 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
397 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
398 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
399 |
x[43],x[44]);break; |
x[43],x[44]);break; |
400 |
case 46: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 46: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
401 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
402 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
403 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
404 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
405 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
406 |
x[43],x[44],x[45]);break; |
x[43],x[44],x[45]);break; |
407 |
case 47: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 47: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
408 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
409 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
410 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
411 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
412 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
413 |
x[43],x[44],x[45],x[46]);break; |
x[43],x[44],x[45],x[46]);break; |
414 |
case 48: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 48: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
415 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
416 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
417 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
418 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
419 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
420 |
x[43],x[44],x[45],x[46],x[47]);break; |
x[43],x[44],x[45],x[46],x[47]);break; |
421 |
case 49: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 49: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
422 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
423 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
424 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
425 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
426 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
427 |
x[43],x[44],x[45],x[46],x[47],x[48]);break; |
x[43],x[44],x[45],x[46],x[47],x[48]);break; |
428 |
case 50: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 50: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
429 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
430 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
431 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
432 |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
x[29],x[30],x[31],x[32],x[33],x[34],x[35], |
433 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
434 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49]);break; |
x[43],x[44],x[45],x[46],x[47],x[48],x[49]);break; |
435 |
case 51: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 51: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
436 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
437 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
438 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
440 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
441 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
442 |
x[50]);break; |
x[50]);break; |
443 |
case 52: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 52: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
444 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
445 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
446 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
448 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
449 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
450 |
x[50],x[51]);break; |
x[50],x[51]);break; |
451 |
case 53: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 53: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
452 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
453 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
454 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
456 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
457 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
458 |
x[50],x[51],x[52]);break; |
x[50],x[51],x[52]);break; |
459 |
case 54: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 54: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
460 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
461 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
462 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
464 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
465 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
466 |
x[50],x[51],x[52],x[53]);break; |
x[50],x[51],x[52],x[53]);break; |
467 |
case 55: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 55: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
468 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
469 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
470 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
472 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
473 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
474 |
x[50],x[51],x[52],x[53],x[54]);break; |
x[50],x[51],x[52],x[53],x[54]);break; |
475 |
case 56: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 56: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
476 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
477 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
478 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
480 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
481 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
482 |
x[50],x[51],x[52],x[53],x[54],x[55]);break; |
x[50],x[51],x[52],x[53],x[54],x[55]);break; |
483 |
case 57: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 57: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
484 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
485 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
486 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
488 |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
x[36],x[37],x[38],x[39],x[40],x[41],x[42], |
489 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
490 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56]);break; |
x[50],x[51],x[52],x[53],x[54],x[55],x[56]);break; |
491 |
case 58: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 58: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
492 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
493 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
494 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
497 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
498 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
499 |
x[57]);break; |
x[57]);break; |
500 |
case 59: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 59: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
501 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
502 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
503 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
506 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
507 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
508 |
x[57],x[58]);break; |
x[57],x[58]);break; |
509 |
case 60: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 60: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
510 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
511 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
512 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
515 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
516 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
517 |
x[57],x[58],x[59]);break; |
x[57],x[58],x[59]);break; |
518 |
case 61: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 61: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
519 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
520 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
521 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
524 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
525 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
526 |
x[57],x[58],x[59],x[60]);break; |
x[57],x[58],x[59],x[60]);break; |
527 |
case 62: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 62: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
528 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
529 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
530 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
533 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
534 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
535 |
x[57],x[58],x[59],x[60],x[61]);break; |
x[57],x[58],x[59],x[60],x[61]);break; |
536 |
case 63: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 63: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
537 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
538 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
539 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
542 |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
x[43],x[44],x[45],x[46],x[47],x[48],x[49], |
543 |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
x[50],x[51],x[52],x[53],x[54],x[55],x[56], |
544 |
x[57],x[58],x[59],x[60],x[61],x[62]);break; |
x[57],x[58],x[59],x[60],x[61],x[62]);break; |
545 |
case 64: res=(*fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
case 64: res=LCAST(fn)(x[0],x[1],x[2],x[3],x[4],x[5],x[6],x[7], |
546 |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
x[8],x[9],x[10],x[11],x[12],x[13],x[14], |
547 |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
x[15],x[16],x[17],x[18],x[19],x[20],x[21], |
548 |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
x[22],x[23],x[24],x[25],x[26],x[27],x[28], |
606 |
if (nargs-- > 0) |
if (nargs-- > 0) |
607 |
x0=va_arg(ll,object); |
x0=va_arg(ll,object); |
608 |
else |
else |
609 |
{return((object)(*fn)());} |
{return(LCAST(fn)());} |
610 |
if (nargs-- > 0) |
if (nargs-- > 0) |
611 |
x1=va_arg(ll,object); |
x1=va_arg(ll,object); |
612 |
else |
else |
613 |
{ return((object)(*fn)(x0));} |
{ return(LCAST(fn)(x0));} |
614 |
if (nargs-- > 0) |
if (nargs-- > 0) |
615 |
x2=va_arg(ll,object); |
x2=va_arg(ll,object); |
616 |
else |
else |
617 |
{return((object)(*fn)(x0,x1));} |
{return(LCAST(fn)(x0,x1));} |
618 |
if (nargs-- > 0) x3=va_arg(ll,object); |
if (nargs-- > 0) x3=va_arg(ll,object); |
619 |
else |
else |
620 |
return((object)(*fn)(x0,x1,x2)); |
return(LCAST(fn)(x0,x1,x2)); |
621 |
if (nargs-- > 0) x4=va_arg(ll,object); |
if (nargs-- > 0) x4=va_arg(ll,object); |
622 |
else |
else |
623 |
return((object)(*fn)(x0,x1,x2,x3)); |
return(LCAST(fn)(x0,x1,x2,x3)); |
624 |
if (nargs-- > 0) x5=va_arg(ll,object); |
if (nargs-- > 0) x5=va_arg(ll,object); |
625 |
else |
else |
626 |
return((object)(*fn)(x0,x1,x2,x3,x4)); |
return(LCAST(fn)(x0,x1,x2,x3,x4)); |
627 |
if (nargs-- > 0) x6=va_arg(ll,object); |
if (nargs-- > 0) x6=va_arg(ll,object); |
628 |
else |
else |
629 |
return((object)(*fn)(x0,x1,x2,x3,x4,x5)); |
return(LCAST(fn)(x0,x1,x2,x3,x4,x5)); |
630 |
if (nargs-- > 0) x7=va_arg(ll,object); |
if (nargs-- > 0) x7=va_arg(ll,object); |
631 |
else |
else |
632 |
return((object)(*fn)(x0,x1,x2,x3,x4,x5,x6)); |
return(LCAST(fn)(x0,x1,x2,x3,x4,x5,x6)); |
633 |
if (nargs-- > 0) x8=va_arg(ll,object); |
if (nargs-- > 0) x8=va_arg(ll,object); |
634 |
else |
else |
635 |
return((object)(*fn)(x0,x1,x2,x3,x4,x5,x6,x7)); |
return(LCAST(fn)(x0,x1,x2,x3,x4,x5,x6,x7)); |
636 |
if (nargs-- > 0) x9=va_arg(ll,object); |
if (nargs-- > 0) x9=va_arg(ll,object); |
637 |
else |
else |
638 |
return((object)(*fn)(x0,x1,x2,x3,x4,x5,x6,x7,x8)); |
return(LCAST(fn)(x0,x1,x2,x3,x4,x5,x6,x7,x8)); |
639 |
return((object)(*fn)(x0,x1,x2,x3,x4,x5,x6,x7,x8,x9)); |
return(LCAST(fn)(x0,x1,x2,x3,x4,x5,x6,x7,x8,x9)); |
640 |
|
|
641 |
} |
} |
642 |
else {object *new; |
else {object *new; |