893cdae27ff0a5f85236edfdfbe63b04401a251f
1 /* { dg-do run { target { { i?86-*-* x86_64-*-* } && ilp32 } } } */
2 /* { dg-options "-mpreferred-stack-boundary=2" } */
4 /* C99 6.5.2.2 Function calls.
5 Test passing varargs of the combination of decimal float types and
11 /* Supposing the list of varying number of arguments is:
12 unsigned int, _Decimal128, double, _Decimal32, _Decimal64. */
15 vararg_d32 (unsigned arg
, ...)
22 va_arg (ap
, unsigned int);
23 va_arg (ap
, _Decimal128
);
25 result
= va_arg (ap
, _Decimal32
);
32 vararg_d64 (unsigned arg
, ...)
39 va_arg (ap
, unsigned int);
40 va_arg (ap
, _Decimal128
);
42 va_arg (ap
, _Decimal32
);
43 result
= va_arg (ap
, _Decimal64
);
50 vararg_d128 (unsigned arg
, ...)
57 va_arg (ap
, unsigned int);
58 result
= va_arg (ap
, _Decimal128
);
65 vararg_int (unsigned arg
, ...)
72 result
= va_arg (ap
, unsigned int);
79 vararg_double (unsigned arg
, ...)
86 va_arg (ap
, unsigned int);
87 va_arg (ap
, _Decimal128
);
88 result
= va_arg (ap
, double);
98 if (vararg_d32 (3, 0, 1.0dl
, 2.0, 3.0df
, 4.0dd
) != 3.0df
) FAILURE
99 if (vararg_d64 (4, 0, 1.0dl
, 2.0, 3.0df
, 4.0dd
) != 4.0dd
) FAILURE
100 if (vararg_d128 (1, 0, 1.0dl
, 2.0, 3.0df
, 4.0dd
) != 1.0dl
) FAILURE
101 if (vararg_int (0, 0, 1.0dl
, 2.0, 3.0df
, 4.0dd
) != 0) FAILURE
102 if (vararg_double (2, 0, 1.0dl
, 2.0, 3.0df
, 4.0dd
) != 2.0) FAILURE