58c8adc127
* tree.h (enum tree_index): Add TI_VA_LIST_GPR_COUNTER_FIELD
and TI_VA_LIST_FPR_COUNTER_FIELD.
(va_list_gpr_counter_field, va_list_fpr_counter_field): Define.
* tree-pass.h (pass_stdarg): Add.
* tree-optimize.c (init_tree_optimization_passes): Add pass_stdarg.
* tree-stdarg.c: New file.
* Makefile.in (OBJS-common): Add tree-stdarg.o.
(tree-stdarg.o): Add dependencies.
* function.h (struct function): Add va_list_gpr_size and
va_list_fpr_size fields.
* function.c (allocate_struct_function): Initialize them.
* config/i386/i386.c (ix86_build_builtin_va_list): Initialize
va_list_{g,f}pr_counter_field.
(ix86_setup_incoming_varargs): Don't do anything if reg_save
area will not be used. Only save registers that tree-stdarg.c
detected they need saving.
(ix86_va_start): Don't set up fields that won't be used.
* config/rs6000/rs6000.c (rs6000_build_builtin_va_list): Initialize
va_list_{g,f}pr_counter_field.
(setup_incoming_varargs): Don't do anything if reg_save
area will not be used. Only save registers that tree-stdarg.c
detected they need saving.
(rs6000_va_start): Don't set up fields that won't be used.
* gcc.c-torture/execute/stdarg-1.c: New test.
* gcc.c-torture/execute/stdarg-2.c: New test.
* gcc.c-torture/execute/stdarg-3.c: New test.
* gcc.dg/tree-ssa/stdarg-1.c: New test.
* gcc.dg/tree-ssa/stdarg-2.c: New test.
* gcc.dg/tree-ssa/stdarg-3.c: New test.
* gcc.dg/tree-ssa/stdarg-4.c: New test.
* gcc.dg/tree-ssa/stdarg-5.c: New test.
From-SVN: r88279
167 lines
2.5 KiB
C
167 lines
2.5 KiB
C
#include <stdarg.h>
|
|
|
|
extern void abort (void);
|
|
|
|
int foo_arg, bar_arg;
|
|
long x;
|
|
double d;
|
|
va_list gap;
|
|
struct S1 { int i; double d; int j; double e; } s1;
|
|
struct S2 { double d; long i; } s2;
|
|
int y;
|
|
|
|
void
|
|
bar (int v)
|
|
{
|
|
bar_arg = v;
|
|
}
|
|
|
|
void
|
|
f1 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
va_start (ap, i);
|
|
while (i-- > 0)
|
|
x = va_arg (ap, long);
|
|
va_end (ap);
|
|
}
|
|
|
|
void
|
|
f2 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
va_start (ap, i);
|
|
while (i-- > 0)
|
|
d = va_arg (ap, double);
|
|
va_end (ap);
|
|
}
|
|
|
|
void
|
|
f3 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
int j = i;
|
|
while (j-- > 0)
|
|
{
|
|
va_start (ap, i);
|
|
x = va_arg (ap, long);
|
|
va_end (ap);
|
|
bar (x);
|
|
}
|
|
}
|
|
|
|
void
|
|
f4 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
int j = i;
|
|
while (j-- > 0)
|
|
{
|
|
va_start (ap, i);
|
|
d = va_arg (ap, double);
|
|
va_end (ap);
|
|
bar (d + 4.0);
|
|
}
|
|
}
|
|
|
|
void
|
|
f5 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
va_start (ap, i);
|
|
while (i-- > 0)
|
|
s1 = va_arg (ap, struct S1);
|
|
va_end (ap);
|
|
}
|
|
|
|
void
|
|
f6 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
va_start (ap, i);
|
|
while (i-- > 0)
|
|
s2 = va_arg (ap, struct S2);
|
|
va_end (ap);
|
|
}
|
|
|
|
void
|
|
f7 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
int j = i;
|
|
while (j-- > 0)
|
|
{
|
|
va_start (ap, i);
|
|
s1 = va_arg (ap, struct S1);
|
|
va_end (ap);
|
|
bar (s1.i);
|
|
}
|
|
}
|
|
|
|
void
|
|
f8 (int i, ...)
|
|
{
|
|
va_list ap;
|
|
int j = i;
|
|
while (j-- > 0)
|
|
{
|
|
va_start (ap, i);
|
|
s2 = va_arg (ap, struct S2);
|
|
y = va_arg (ap, int);
|
|
va_end (ap);
|
|
bar (s2.i);
|
|
}
|
|
}
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
struct S1 a1, a3;
|
|
struct S2 a2, a4;
|
|
|
|
f1 (7, 1L, 2L, 3L, 5L, 7L, 9L, 11L, 13L);
|
|
if (x != 11L)
|
|
abort ();
|
|
f2 (6, 1.0, 2.0, 4.0, 8.0, 16.0, 32.0, 64.0);
|
|
if (d != 32.0)
|
|
abort ();
|
|
f3 (2, 1L, 3L);
|
|
if (bar_arg != 1L || x != 1L)
|
|
abort ();
|
|
f4 (2, 17.0, 19.0);
|
|
if (bar_arg != 21 || d != 17.0)
|
|
abort ();
|
|
a1.i = 131;
|
|
a1.j = 251;
|
|
a1.d = 15.0;
|
|
a1.e = 191.0;
|
|
a3 = a1;
|
|
a3.j = 254;
|
|
a3.e = 178.0;
|
|
f5 (2, a1, a3, a1);
|
|
if (s1.i != 131 || s1.j != 254 || s1.d != 15.0 || s1.e != 178.0)
|
|
abort ();
|
|
f5 (3, a1, a3, a1);
|
|
if (s1.i != 131 || s1.j != 251 || s1.d != 15.0 || s1.e != 191.0)
|
|
abort ();
|
|
a2.i = 138;
|
|
a2.d = 16.0;
|
|
a4.i = 257;
|
|
a4.d = 176.0;
|
|
f6 (2, a2, a4, a2);
|
|
if (s2.i != 257 || s2.d != 176.0)
|
|
abort ();
|
|
f6 (3, a2, a4, a2);
|
|
if (s2.i != 138 || s2.d != 16.0)
|
|
abort ();
|
|
f7 (2, a3, a1, a1);
|
|
if (s1.i != 131 || s1.j != 254 || s1.d != 15.0 || s1.e != 178.0)
|
|
abort ();
|
|
if (bar_arg != 131)
|
|
abort ();
|
|
f8 (3, a4, a2, a2);
|
|
if (s2.i != 257 || s2.d != 176.0)
|
|
abort ();
|
|
return 0;
|
|
}
|