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 9static int errors = 0; 10 11static void 12verify (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) \ 51static void \ 52varargs##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 69TCASE(0, p0 , P0 ) 70TCASE(1, p0 p1 , P0 P1 ) 71TCASE(2, p0 p1 p2 , P0 P1 P2 ) 72TCASE(3, p0 p1 p2 p3 , P0 P1 P2 P3 ) 73TCASE(4, p0 p1 p2 p3 p4 , P0 P1 P2 P3 P4 ) 74TCASE(5, p0 p1 p2 p3 p4 p5 , P0 P1 P2 P3 P4 P5 ) 75TCASE(6, p0 p1 p2 p3 p4 p5 p6 , P0 P1 P2 P3 P4 P5 P6 ) 76TCASE(7, p0 p1 p2 p3 p4 p5 p6 p7 , P0 P1 P2 P3 P4 P5 P6 P7 ) 77TCASE(8, p0 p1 p2 p3 p4 p5 p6 p7 p8 , P0 P1 P2 P3 P4 P5 P6 P7 P8 ) 78TCASE(9, p0 p1 p2 p3 p4 p5 p6 p7 p8 p9, P0 P1 P2 P3 P4 P5 P6 P7 P8 P9) 79 80int 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} 97