1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
/*
920625-1.c from the execute part of the gcc torture suite.
*/
#include <testfwk.h>
#ifdef __SDCC
#pragma std_c99
#endif
#include <stdarg.h>
#if !defined(__SDCC_pdk14) // Lack of memory
typedef struct{double x,y;}point;
point pts[]={{1.0,2.0},{3.0,4.0},{5.0,6.0},{7.0,8.0}};
static int va1(int nargs,...)
{
va_list args;
int i;
point pi;
va_start(args,nargs);
for(i=0;i<nargs;i++){
pi=va_arg(args,point);
if(pts[i].x!=pi.x||pts[i].y!=pi.y)ASSERT(0);
}
va_end(args);
}
typedef struct{int x,y;}ipoint;
ipoint ipts[]={{1,2},{3,4},{5,6},{7,8}};
static int va2(int nargs,...)
{
va_list args;
int i;
ipoint pi;
va_start(args,nargs);
for(i=0;i<nargs;i++){
pi=va_arg(args,ipoint);
if(ipts[i].x!=pi.x||ipts[i].y!=pi.y)ASSERT(0);
}
va_end(args);
}
#endif
void
testTortureExecute (void)
{
#if 0 // TODO: Enable when sdcc supports struct parameters
va1(4,pts[0],pts[1],pts[2],pts[3]);
va2(4,ipts[0],ipts[1],ipts[2],ipts[3]);
return;
#endif
}
|
