URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Only display areas with differences |
Details |
Blame |
View Log
| Rev 149 |
Rev 154 |
/* { dg-options "-std=gnu99" } */
|
/* { dg-options "-std=gnu99" } */
|
|
|
/* C99 6.5.2.2 Function calls. */
|
/* C99 6.5.2.2 Function calls. */
|
|
|
#include <stdarg.h>
|
#include <stdarg.h>
|
|
|
extern void abort (void);
|
extern void abort (void);
|
|
|
struct S1
|
struct S1
|
{
|
{
|
struct
|
struct
|
{
|
{
|
_Decimal64 e;
|
_Decimal64 e;
|
} b[0];
|
} b[0];
|
};
|
};
|
|
|
/* Test handling vararg parameters whose size is 0. */
|
/* Test handling vararg parameters whose size is 0. */
|
|
|
int check_var(int z,...)
|
int check_var(int z,...)
|
{
|
{
|
double d;
|
double d;
|
struct S1 s1;
|
struct S1 s1;
|
long long result;
|
long long result;
|
va_list ap;
|
va_list ap;
|
va_start (ap, z);
|
va_start (ap, z);
|
d = va_arg (ap, double);
|
d = va_arg (ap, double);
|
s1 = va_arg (ap, struct S1);
|
s1 = va_arg (ap, struct S1);
|
result = va_arg (ap, long long);
|
result = va_arg (ap, long long);
|
va_end (ap);
|
va_end (ap);
|
return (result == 2LL);
|
return (result == 2LL);
|
|
|
}
|
}
|
|
|
int
|
int
|
main ()
|
main ()
|
{
|
{
|
struct S1 s1;
|
struct S1 s1;
|
struct S1 a1[5];
|
struct S1 a1[5];
|
|
|
if (check_var(5, 1.0, s1, 2LL, a1[2], a1[2]) == 0)
|
if (check_var(5, 1.0, s1, 2LL, a1[2], a1[2]) == 0)
|
abort ();
|
abort ();
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.