1  /* The purpose of this code is to test argument passing of a tuple of
       2     11 integers, with the break point between named and unnamed arguments
       3     at every possible position.	*/
       4  
       5  #include <stdarg.h>
       6  #include <stdio.h>
       7  #include <stdlib.h>
       8  
       9  static int errors = 0;
      10  
      11  static void
      12  verify (const char *tcase, int n[11])
      13  {
      14    int i;
      15    for (i = 0; i <= 10; i++)
      16      if (n[i] != i)
      17        {
      18  	printf (" %s: n[%d] = %d expected %d\n", tcase, i, n[i], i);
      19  	errors++;
      20        }
      21  }
      22  
      23  #define STR(x) #x
      24  
      25  #define p(i) int q##i,
      26  #define P(i) n[i] = q##i;
      27  
      28  #define p0 p(0)
      29  #define p1 p(1)
      30  #define p2 p(2)
      31  #define p3 p(3)
      32  #define p4 p(4)
      33  #define p5 p(5)
      34  #define p6 p(6)
      35  #define p7 p(7)
      36  #define p8 p(8)
      37  #define p9 p(9)
      38  
      39  #define P0 P(0)
      40  #define P1 P(1)
      41  #define P2 P(2)
      42  #define P3 P(3)
      43  #define P4 P(4)
      44  #define P5 P(5)
      45  #define P6 P(6)
      46  #define P7 P(7)
      47  #define P8 P(8)
      48  #define P9 P(9)
      49  
      50  #define TCASE(x, params, vecinit)		\
      51  static void					\
      52  varargs##x (params ...)				\
      53  {						\
      54    va_list ap;					\
      55    int n[11];					\
      56    int i;					\
      57  						\
      58    va_start (ap, q##x);				\
      59    vecinit					\
      60    for (i = x + 1; i <= 10; i++)			\
      61      n[i] = va_arg (ap, int);			\
      62    va_end (ap);					\
      63  						\
      64    verify (STR(varargs##x), n);			\
      65  }
      66  
      67  #define TEST(x) varargs##x (0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
      68  
      69  TCASE(0, p0			      , P0			     )
      70  TCASE(1, p0 p1			      , P0 P1			     )
      71  TCASE(2, p0 p1 p2		      , P0 P1 P2		     )
      72  TCASE(3, p0 p1 p2 p3		      , P0 P1 P2 P3		     )
      73  TCASE(4, p0 p1 p2 p3 p4		      , P0 P1 P2 P3 P4		     )
      74  TCASE(5, p0 p1 p2 p3 p4 p5	      , P0 P1 P2 P3 P4 P5	     )
      75  TCASE(6, p0 p1 p2 p3 p4 p5 p6	      , P0 P1 P2 P3 P4 P5 P6	     )
      76  TCASE(7, p0 p1 p2 p3 p4 p5 p6 p7      , P0 P1 P2 P3 P4 P5 P6 P7	     )
      77  TCASE(8, p0 p1 p2 p3 p4 p5 p6 p7 p8   , P0 P1 P2 P3 P4 P5 P6 P7 P8   )
      78  TCASE(9, p0 p1 p2 p3 p4 p5 p6 p7 p8 p9, P0 P1 P2 P3 P4 P5 P6 P7 P8 P9)
      79  
      80  int main(void)
      81  {
      82    TEST(0);
      83    TEST(1);
      84    TEST(2);
      85    TEST(3);
      86    TEST(4);
      87    TEST(5);
      88    TEST(6);
      89    TEST(7);
      90    TEST(8);
      91    TEST(9);
      92  
      93    if (errors)
      94      abort ();
      95    exit (0);
      96  }