summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/compat/struct-by-value-22_y.c
blob: ea5dec2268ea5d33377699abbfe07722ad3424ec (plain)
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
#include <stdarg.h>
#include "compat-common.h"
#include "mixed-struct-defs.h"
#include "mixed-struct-check.h"

#ifdef SKIP_VA
const int test_va = 0;
#else
const int test_va = 1;
#endif

#ifndef SKIP_VLA_IN_STRUCT
#define T(NAME, FIELDS, TYPE, FIELDINIT, FIELDTEST)			\
void									\
testva##NAME (int n, ...)						\
{									\
  va_list ap;								\
  if (test_va)								\
    {									\
      struct S { FIELDS TYPE a[n]; } s;					\
      int fail = 0, i, j;						\
									\
      va_start (ap, n);							\
      for (j = 0; j < 2; ++j)						\
        {								\
	  s = va_arg (ap, struct S);					\
	  for (i = 0; i < n; ++i)					\
	    if (s.a[i] != 12 + n - i)					\
	      ++fail;							\
	  if (fail)							\
	    { DEBUG_FAIL; }						\
	  if (!j && va_arg (ap, int) != n)				\
	    { DEBUG_FAIL; }						\
	  FIELDTEST;							\
	}								\
      va_end (ap);							\
    }									\
}

#include "struct-by-value-22_x.c"
#endif